Re: plots with variation of arbitrary constant
- To: mathgroup at smc.vnet.net
- Subject: [mg60345] Re: [mg60316] plots with variation of arbitrary constant
- From: "David Annetts" <davidannetts at aapt.net.au>
- Date: Wed, 14 Sep 2005 03:27:13 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hi Narasimham ,
> How to show 2D plots for chosen range of a constant?
> Show[Plot[Sin[x]+ c,{x,0,Pi}],{c,1,10,1}] does not work.
No, but
Plot[Sin[x] + #, {x, 0, Pi}, PlotRange -> {1, 12}, PlotLabel ->
ToString[#]] & /@ Range[10];
SelectionMove[EvaluationNotebook[], All, GeneratedCell];
FrontEndTokenExecute["OpenCloseGroup"]
FrontEndTokenExecute["SelectionAnimate"]
Does. There are many other solutions.
Regards,
Dave.