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 > >