bild=Plot[{1/(0.2+p^3),2.4 p/(0.1+p)},{p,0,3}, PlotStyle->{{},Dashing[{0.01}]}, AxesLabel->{"p",""},ImageSize->{400,300}];