Re: make simpler please
- To: mathgroup at smc.vnet.net
- Subject: [mg120180] Re: make simpler please
- From: Heike Gramberg <heike.gramberg at gmail.com>
- Date: Tue, 12 Jul 2011 06:57:35 -0400 (EDT)
- References: <201107111056.GAA08348@smc.vnet.net>
You can create a snapshot of the graph by downloading the source code of
the demonstration,
opening this file in Mathematica, pressing the +-button in the top-right
corner of the Manipulate
pane and choosing "Paste Snapshot" from the drop-down menu. The output
should be
something like
DynamicModule[{filling = False, V1 = 10, V2 = 83, V3 = 25, V4 = 18,
V5 = 20, V6 = 30},
Plot[{AE1[x, {V1}], AE2[x, {V2}], AE3[x, {V3, V1}], AE4[x, {V4}],
AE5[x, {V5}], AE6[x, {V6, V1}]}, {x, -90, 90}, Filling -> filling,
Frame -> True, GridLines -> Automatic, ImageSize -> {475, 375},
PlotStyle -> {Gray, Orange, Green, Blue, Black, Red},
PlotRange -> {0, 2}]]
Heike.
On 11 Jul 2011, at 11:56, J and B wrote:
> Would some one please make this simpler? I would just like to plot the
> curves. I don't want to use manipulate.
> Thanks
>
> =
http://demonstrations.wolfram.com/TheAlphaAndBetaComponentsOfTheHodgkinHuxle
> yModel/
>
>
- References:
- make simpler please
- From: "J and B" <noslowski@comcast.net>
- make simpler please