Re: Plot in a Do loop does nothing
- To: mathgroup at smc.vnet.net
- Subject: [mg78291] Re: [mg78229] Plot in a Do loop does nothing
- From: DrMajorBob <drmajorbob at bigfoot.com>
- Date: Wed, 27 Jun 2007 05:39:58 -0400 (EDT)
- References: <25839138.1182851883499.JavaMail.root@m35>
- Reply-to: drmajorbob at bigfoot.com
Any of these should work (among others):
Do[Print@Plot[Sin[x], {x, 0, 2*n*Pi}], {n, 1, 2}]
GraphicsColumn@Table[Plot[Sin[x], {x, 0, 2*n*Pi}], {n, 1, 2}]
Column@Table[Plot[Sin[x], {x, 0, 2*n*Pi}], {n, 1, 2}]
GraphicsRow@Table[Plot[Sin[x], {x, 0, 2*n*Pi}], {n, 1, 2}]
Column@Table[Plot[Sin[x], {x, 0, 2*n*Pi}], {n, 1, 2}]
Bobby
On Tue, 26 Jun 2007 03:34:21 -0500, Tim Birks <pystab at hotmail.com> wrote:
>
> Can anyone please explain why the line:
> Do[Plot[Sin[x], {x, 0, 2*n*Pi}], {n, 1, 2}]
>
> does nothing in Mathematica 6? Or, how else I can produce such a series
> of
> related plots? It worked fine in Mathematica 5!
>
> T
>
>
>
>
--
DrMajorBob at bigfoot.com