Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Help again...part two of my message with diffeq' topicStudent Support Forum > General > "Help again...part two of my message with diffeq"

Next Comment >Help | Reply To Topic
Author Comment/Response
Pam Manzer
10/03/99 7:09pm

Hello,
This is the third time that I've written trying to get help with this diffeq problem. Here are all of the steps that you told me to do and something is wrong.
(step 1) eqn=y'[x]==Sin[x]+Sin[y[x]]; (I tired Sin[x]+Sin[y], but that didn't work.
(step 2)<<Graphics`PlotField`
(step 4)field=PlotVectorField[{1,Last[eqn]},{x,-2,2},
{y[x],-2,2}]
(step 5)sol=DSolve[eqn,y[x],x]; (worked, but took along time, but when I had x, y[x] then it works)
(step 6)ysol[x_]=y[x]/.First [sol]; (when I had y[x], x on step 5, then this one didn't work, but when I had x, y[x] then it worked. Same goes for step 7, but not 8 and 9 (either way I did it))
(step 7) functionlist=ysol[x]/.C[1]->Range[-2,2,1/2];
(step 8) lines=Plot[Evaluate[functionlist],{x,-2,2}, PlotStyle->{RGBColor[1,0,0]}, PlotRange->{0,-2,2]},AspectRatio->Automatic]
(step 9) Show[lines, field]

I hope that you can understand this...I'm stuck!!!!

Thanks,
Pam

URL: ,

Subject (listing for 'Help again...part two of my message with diffeq')
Author Date Posted
Help again...part two of my message with diffeq Pam Manzer 10/03/99 7:09pm
Re: Help again...part two of my message with di... Forum Modera... 10/04/99 2:11pm
More Info: Re: Help again...part two of my mess... Forum Modera... 10/07/99 07:48am
Next Comment >Help | Reply To Topic