MathGroup Archive 2007

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

Search the Archive

Re: Table[Plot[]]doesn't work as it should in v6


On 18 Dez., 01:22, sean_incali <sean_inc... at yahoo.com> wrote:
> I have this code for v5. It generates list of plots(i think) which
> then can collapsed into single cell that shows the first graph which
> can be animated by double clicking on it.
>
> Table[Plot[i/(1 + y^2), {y, 0, 8},
>   PlotStyle -> RGBColor[1, (i - 0.8)/i, 0], PlotRange -> {0, 8},
>   AspectRatio -> Automatic], {i, 1, 8, 0.1}]
>
> In v6, the same code seems to make a graphics array surrounded by
> curly brackets and separated by commas. (what is with this?  is there
> not a way to get rid of these puctuations?)
>
> Of course I don't need, at the moment, to have an animation. But i
> always thought it was a nice, simple application of Table that had a
> great result.
>
> Is this a bug or does anyone have same problem when the code is run on
> their computer?
>
> Also, if this is not a bug, but a feature, how would you get the old
> style Table of plots/ where you get the collpsable cell with all the
> graphs in a series?
>
> Thanks for any info ion advance,
>
> sean

Hello

If you want the (exact) v5 behaviour with version v6 you can do the
following:

 - add a Print statement in front of Table; and
 - suppress the output with a semicolon

i.e.

Table[Print[
   Plot[i/(1 + y^2), {y, 0, 8},
    PlotStyle -> RGBColor[1, (i - 0.8)/i, 0],
         PlotRange -> {0, 8}, AspectRatio -> Automatic]], {i, 1, 8,
0.1}];

Now you cann collapse the graphic cells, select the collapsed cells
and start the animation with the command

 - Ctrl+y; or
 - menu item "Graphics / Rendering / Animate Selected Graphics"

Best Regards
Norbert Marxer



  • Prev by Date: Mathematica SIG (Washington D.C. and Northern Virginia)
  • Next by Date: Re: FindRoot / Jacobian
  • Previous by thread: Re: Table[Plot[]]doesn't work as it should in v6
  • Next by thread: FindRoot / Jacobian