plotfunc2d(1,sin(1/x),-1)
Sinus- und Kosinus-Wunderdinge
Prof. Dr. Dörte Haftendorn, Mathematik mit MuPAD 4, Mai 07
Existiert mit ausführlichen Kommentaren und Berechnungen in Mathematica-Web
https://mathe.web.leuphana.de www.mathematik-verstehen.de
####################################################################
Graphen-Spielwiese
plotfunc2d(1,sin(1/x),-1)
plotfunc2d(1,cos(1/x),-1)
plotfunc2d(x,x*sin(1/x),-x, x=-1..1)
plotfunc2d(x,x*cos(1/x),-x, x=-1..1)
plotfunc2d(x^2,x^2*cos(1/x),-x^2, x=-0.8..0.8);
plotfunc2d(x^2,x^2*sin(1/x),-x^2, x=-0.8..0.8)
plotfunc2d(x^3,x^3*cos(1/x),-x^3, x=-0.8..0.8);
plotfunc2d(x^3,x^3*sin(1/x),-x^3, x=-0.8..0.8)
plotfunc2d(cos(x), cos(1/x),1/x,Mesh=1000,x=-0..0.001,
ViewingBoxYRange=-1..1)
plotfunc2d(x^3,x^3*cos(1/x),-x^3,Mesh=1000,x=-2..2,
ViewingBoxYRange=-1..1)
