Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Using For[] for Generating Multiple Output Cells

• To: mathgroup at smc.vnet.net
• Subject: [mg104924] Re: [mg104858] Using For[] for Generating Multiple Output Cells
• From: DrMajorBob <btreat1 at austin.rr.com>
• Date: Fri, 13 Nov 2009 05:55:59 -0500 (EST)
• References: <200911121101.GAA18561@smc.vnet.net>
• Reply-to: drmajorbob at yahoo.com

The output of For is Null, so of course the second code has no output.

But this does:

For[x = 65, x < 91, x++,
   n0 = Names[StringJoin["System`", FromCharacterCode[x], "*"]]
   ];
Grid[Partition[n0, 3], Alignment -> Left, Frame -> All]

or this:

n0 = Table[
    Names[StringJoin["System`", FromCharacterCode[x], "*"]], {x, 65,
     91}];
Grid[Partition[n0, 3], Alignment -> Left, Frame -> All]

or this:

n0 = Table[
    Names[StringJoin["System`", FromCharacterCode[x], "*"]], {x, 65,
     91}];
Grid[Partition[Flatten@n0, 3], Alignment -> Left, Frame -> All]

Bobby

On Thu, 12 Nov 2009 05:01:23 -0600, BenT <brtubb at pdmusic.org> wrote:

> Consider this v7 code which works as intended:
>
> x = 65;
> n0 = Names[
>    StringJoin[
>     "System`", FromCharacterCode[x], "*"
>     ]
>    ];
> Grid[Partition[n0, 3], Alignment -> Left, Frame -> All]
>
> And now consider this code which allows far more versatility, for
> consecutive multiple outputs using the For[] function. BUT for some
> reason it doesn't appear to work at all! Does anyone know why? Can it
> be "fixed" as intended?
>
> For[x = 65, x < 91, x++,
>  n0 = Names[
>    StringJoin[
>     "System`", FromCharacterCode[x], "*"
>     ]
>    ];
>  Grid[Partition[n0, 3], Alignment -> Left, Frame -> All]
>  ]
>
> --- Benjamin Tubb
>


-- 
DrMajorBob at yahoo.com

• References:
  • Using For[] for Generating Multiple Output Cells
    • From: BenT <brtubb@pdmusic.org>