bild = Plot[x^5-2 x +1, {x,-3,3}, AxesLabel -> {"x","y"}, PlotRange -> {-160,160},ImageSize->{400,300}];