Wolfram Mathematica

Har en uppgift som skall lösas med wolfram mathematica som ser ut som följande:

Lös numeriskt differentialekvationen y''=x*sin y med bivillkoren y(0)=1 och y'(0)=1 på intervallet 0=< x =< 19 och plotta resultatet.

Hur många lokala max och min har funktionen i intervallet 0<x<19?

Enligt material jag fått av plugget borde det göras ungefär såhär:


Varför får jag ett felmeddelande?

Exakt hur ska uppgiften skrivas..?

svaret ska va på formen

Antal min = ?
Antal Max = ?

Om det var det du menade?

Nja, jag tänkte mer på hur du skrev när du skrev in det i Wolfram..

Första steget som jag fastnade på skrev jag i mitt första inlägg i kod-rutan. Eller är det jag som missar något?

Ok här kommer förklaringen. Vi ska bestämma antal max/min punkter i intervallet (0,20)

1) koden till mathematica "funktion =
First[y /.
NDSolve[{y''[x] == x*Sin[y[x]], y[0] == 1, y'[0] == 1},
y, {x, 0, 19}]]
funktion[2]"

prova att sätta in t.ex funktion[2] och du borde få 3.85402

2) Nu kan du plotta skiten Plot[funktion[x], {x, 0, 19}]

Då får du en graf och sen är det bara räkna hur många max min du borde få 8 max och 8 min

/ Broder från plugget