(*Isthishowtodefineafuncwithafuncargument?*)(*CanitbewrittentoconformtoMathematicaconventionwherelastthreevariablesarealist?*)myPlot[f_,var_,a_,b_]:=Manipulate[Show[Plot[f[var],{var,a,b}],Graphics[{PointSize[.02],Point[{pnt,f[pnt]},VertexColorsRed]}]],{pnt,a,b}](*Itworkswithoneindependentvariable*)f[x_]:=x^2myPlot[f,x,-2,2](*Butwhataboutmultipleindependentvariables?*)ff[x,t,z]:=x^3/t+z(*Orwhatifit'sjustanexpression,say,x^3?*)(*HowdoIgetmyPlottoimagef[x]ANDff[x,3,7]andx^3?*)
Out[]=
