Re: repeating elements in a list
- To: mathgroup at smc.vnet.net
- Subject: [mg54910] Re: [mg54878] repeating elements in a list
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Sun, 6 Mar 2005 00:55:59 -0500 (EST)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
lst={A,B,C};
n=3;
newlst=Flatten[Table[#,{n}]&/@lst]
{A,A,A,B,B,B,C,C,C}
Bob Hanlon
>
> From: Torsten Coym <torsten.coym at eas.iis.fraunhofer.de>
To: mathgroup at smc.vnet.net
> Date: 2005/03/05 Sat AM 01:34:23 EST
> To: mathgroup at smc.vnet.net
> Subject: [mg54910] [mg54878] repeating elements in a list
>
> Hello,
>
> suppose I have list
>
> lst={A, B, C}
>
> and I want to create a new list, where all elements are repeated n times
> so that (for n=3):
>
> newlst={A, A, A, B, B, B, C, C, C}
>
> I have the following code to do this:
>
> n=3;
> newlst=Flatten[Table[Table[lst[[i]], {n}], {i, Length[lst]}]];
>
> but I'm pretty sure, that there must be a more elegant way to solve the
> problem.
>
>
> thank you
>
>