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