MathGroup Archive 2013

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Manipulate: Tracking symbols which are not stated explicitly

  • To: mathgroup at smc.vnet.net
  • Subject: [mg129401] Re: Manipulate: Tracking symbols which are not stated explicitly
  • From: "Rolf.Mertig at gmail.com" <Rolf.Mertig at gmail.com>
  • Date: Thu, 10 Jan 2013 21:42:17 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net
  • References: <kclq3q$9pj$1@smc.vnet.net>

With[{reprule={end->endval}},
Manipulate[NDSolve[{y''[x]+Sin[y[x]] y[x]==0,y[0]==1,y'[0]==0},y,{x,0,end}/.reprule],{endval,10,20}]
]

will work.

Am Donnerstag, 10. Januar 2013 08:20:26 UTC+1 schrieb abed.... at gmail.com:
> Hello,
> 
> I am trying to use the Manipulate command to adjust symbols which are not stated explicitly within the command. Is this possible? I am using Mathematica 7.0.1.0. Consider these examples:
> 
> 
> 
> The code below works:
> 
> 
> 
> Manipulate[
> 
>  reprule = {end -> endval};
> 
>  NDSolve[{y''[x] + Sin[y[x]] y[x] == 0, y[0] == 1, y'[0] == 0}, 
> 
>   y, {x, 0, end} /. reprule], {endval, 10, 20}]
> 
> 
> 
> However, this one tells me that "Endpoint endval is not a real number":
> 
> 
> 
> reprule = {end -> endval};
> 
> Manipulate[
> 
>  NDSolve[{y''[x] + Sin[y[x]] y[x] == 0, y[0] == 1, y'[0] == 0}, 
> 
>   y, {x, 0, end} /. reprule], {endval, 10, 20}]




  • Prev by Date: How can I import a file wiht a space as a separator?
  • Next by Date: Parallel computing in version 7 Vs version 8
  • Previous by thread: Manipulate: Tracking symbols which are not stated explicitly
  • Next by thread: ImageSize inconsistency: ListPlot vs DateListPlot