Mathematica < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
Status: |
(Frage) beantwortet | Datum: | 15:21 Do 01.11.2007 | Autor: | remy_ |
Aufgabe | Frage1: Welche der folgenden Ausdrücke sind gleichwertig?
Geben Sie jeweils eine kurze Begründung, warum oder warum nicht?
1. Plus[Times[-1, Power[Plus[a,Times[-1,b]],2]],Power[Plus[a,b],2]]
Times[4,a,b]
Frage2: Die folgenden Zeilen sollen eine mathematische Funktion berechnen, beinhalten aber einen Fehler:
f[x]:=1/x Sin[x]
Führen Sie die Zeilen aus. Wie kommt das unerwünschte Ergebnis zustande? Wie kann der Fehler behoben werden?
|
Zu Frage1:
Wie soll ich das Begründen, oder fomal Ausdrücken?
Zu Frage2:
Kann mir bei dieser Fragestellung jemand helfen?
Vielen Dank
Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.
|
|
|
|
Hi remy,
zu 1.) eigentlich müsste
FullForm@Simplify[Plus[Times[-1,Power[Plus[a,Times[-1,b]],2]],Power[Plus[a,b],2]]]
reichen, weil es Times[4,a,b] ausgibt.
zu 2.)
Wenn f so definiert wird, wird es ausschließlich f[x] zu 1/x Sin[x] umformen, jedoch f[y], f[Pi] oder auch f[sonstnichtwas] unverändert zurückgeben.
Mathematica ist eigentlich nur eine Mustererkennungs und Ersetzungsmaschine und das Muster f[x] passt eben nur zeichengenau auf f[x]. Deshalb definiert man Funktionen auch mit sogenannten Patterns (siehe Mathematica Hilfe):
f[x_]:=1/xSin[x] und wenn man es gut machen will:
Clear[f]; f[0|0.]=1; f[x_]:=Sin[x]/x/;x!=0
Alles Gute,
Peter
|
|
|
|