Liebe Liste,ich habe eine reellwertige Funktion von drei reellen Veränderlichen f(x,y,z).
Mit ContourPlot stelle ich die Funktion auf verschieden großen Ebenen dar. (Im Anhang befindet sich ein einfaches Beispiel.)ContourPlot[f[x, y, 0],{x, -3, 3}, {y, 0, 2}, AspectRatio->Automatic, FrameLabel ->{"x in m", "y in m"}, PlotRange ->{{-3,3}, {0,2}, {-10,10}}] ContourPlot[f[0, y, z],{y, 0, 2}, {z, 0, 3}, AspectRatio->Automatic, FrameLabel ->{"y in m", "z in m"}, PlotRange ->{{0,2}, {0,3}, {-10,10}}] ContourPlot[f[x, 0, z],{x, -3, 3}, {z, 0, 3}, AspectRatio->Automatic, FrameLabel ->{"x in m", "z in m"}, PlotRange ->{{-3,3}, {0,3}, {-10,10}}]
Durch AspectRatio->Automatic erreiche ich, dass die horizontale zur vertikalen Achse innerhalb eines ContourPlots maßstäblich ist.
Wie erreiche ich, dass die Achsen aller ContourPlots zueinander maßstäblich sind?
Also die Achsen {x,-3,3}, {y,0,2}, {z,0,3} sollten "exakt" im Verhältnis 6 zu 2 zu 3 sein.
Bemerkung: Wenn ich eine Graphik mit der Maus markiere, ensteht ein rechteckiger Rahmen mit 8 schwarzen Kästchen. Es genügt mir nicht die Kanten dieses Rahmens mit ImageSize zu kontrollieren.
Da je nach Achsenbeschriftung die Länge der Achsen beeinflusst wird. Nehmen wir jetzt an die einzelnen Achsen sind zueinander maßstäblich.Wie erreiche ich es dann, dass beim Ausdrucken des Notebooks die Achsen z. B. "exakt" 12cm zu 4cm zu 6cm sind.
Danke für Eure Hilfe. -- Mit freundlichen Gruessen / Best Regards Prof. Dr.-Ing. Reinhard Schlosser Fachhochschule Deggendorf Fachbereich Elektrotechnik und Medientechnik Edlmairstrasse 6 + 8 94469 Deggendorf Tel 0991-3615-515 Fax 0991-3615-599 reinhard.schlosser@XXXXXXX.de http://www.fh-deggendorf.de
Liste.nb
Description: Mathematica Notebook document
