Re: NDSolve plot problem
- To: mathgroup at smc.vnet.net
- Subject: [mg79343] Re: NDSolve plot problem
- From: chuck009 <dmilioto at comcast.com>
- Date: Wed, 25 Jul 2007 02:06:25 -0400 (EDT)
Not sure what you want. First I had to replace the french-brackets with just paranthesis. Then, if I want several plots, I can either set up a Table:
RCSoln[R_, c_:1, v0_:0] :=
NDSolve[{Derivative[1][v][t] == (1/c)*(i[t] - v[t]/R),
v[0] == v0}, v, {t, 0, 100}]
Table[Plot[Evaluate[v[t] /. {RCSoln[rval]}], {t, 0, 100}],
{rval, 1, 5}]
Or use a Pure function and map it onto a list of r values:
In[73]:=
(Plot[Evaluate[v[t] /. {RCSoln[#1]}], {t, 0, 100}] & ) /@
Range[5]