defining consecutive variables

*To*: mathgroup at smc.vnet.net*Subject*: [mg99392] defining consecutive variables*From*: Jason <jbiggs2 at uoregon.edu>*Date*: Tue, 5 May 2009 05:37:58 -0400 (EDT)

I have a code where I need to define a large number of variables as matrices, called q1,q2,q3......qn. I'd like to be able to define them all without writing out n assignment lines, so a Do loop seems appropriate to me but I don't know how to assign sequential variable names. This gets the job done but it is really ugly IMO f[x_] := Table[x RandomReal[], {n, 5}, {np, 5}](*for example*) Do[ToExpression["q" <> ToString[n] <> "=f[n]"], {n, 0, 40}] at the end of which I have 41 matrices which I can call as q0,q1, etc. Is this the best way to accomplish this task? Thanks

**Follow-Ups**:**Re: defining consecutive variables***From:*DrMajorBob <btreat1@austin.rr.com>