User Portlet
| Discussions |
|---|
| Try this: [mcode]a = -0.3;b=2; f[x_]:=a x + b; line=Plot[f[x],{x,0,5}, PlotStyle->{{Red,Thickness[0.015]}}, AxesLabel->{"x","f[x]"}]; points=Graphics[{Green,PointSize[0.15], Point[{1,4}],PointSize[0.18], Point[{3,1.4}],PointSize[0.17], Point[{4.2,... |