|
|
|
|
|
|
|
|
Für eine numerische Lösung von Gleichungen ist eine graphische Darstellung der Funktion zweckmäßig, da für die Lösung ein Startwert angegeben werden muß.
(* Beispiel *)
Remove["Global`*"]
gl= Log[x+3]+Sin[2 x]+x;
Plot[gl,{x,-2.5,10}] (* Plotten der Funktion *)
FindRoot[gl==5,{x,1}] (* Loesung der Gleichung mit Startwert 1 *)
gl /. % (* Testen auf Richtigkeit der Lösung *)
