i=0:0.001:2;y=[590*i.^4+34*i.^2+1]./[8*(35*i.^3+i)];plot(i,y);[maxy,maxi]=max(y);[miny,mini]=min(y);hold on;plot([i([maxi,mini])],[maxy miny],'r.')
