abb=Plot[x^2/(1+x^2),{x,0,5},AxesLabel -> {"x","r"},ImageSize->{400,300}];