|
> ich will einen 3D-Plot von einer abschnittsweise - definierten Funktion machen Abschnittweise Definition geht in Mathematica ganz einfach mit Nebenbedingungen, eben genauso, wie das Problem auch formuliert wurde > die Funktion lautet: > falls x > y: f(x,y) = x + y/2 ; > sonst : f(x,y) = y + x/2; Also (die Bedingung wird mit /; an die linke Seite der Definition angehängt): In[1]:= f[x_,y_]/; x>y := x+y/2 In[2]:= f[x_,y_] := y+x/2 In[3]:= Plot3D[f[x,y],{x,-1,1},{y,-1,1}]; Roman Mäder ----------------------------------------------------------------------- MathConsult Dr. R. Mäder Samstagernstrasse 58a Mathematik- und Informatik-Beratung CH-8832 Wollerau T: +41-1-687 4050 mailto:maeder@XXXXXXX.ch F: +41-1-687 4054 http://www.mathconsult.ch/ ----------------------------------------------------------------------- [[im Wesentlichen dieselbe Idee hatte auch Thomas Hahn; ich verzichte daher darauf, die fast gleichlautende Mail an DMUG wieterzuleiten -- REM ]] |