Re: How can I concatenate elements

*To*: mathgroup at smc.vnet.net*Subject*: [mg119851] Re: How can I concatenate elements*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Sun, 26 Jun 2011 06:24:39 -0400 (EDT)*Reply-to*: hanlonr at cox.net

s1 = {1, 2, 3, 4, 5, 6}; s2 = {c, k}; s3 = Flatten@Outer[StringJoin[ToString /@ {#2, #1}] &, s2, s1] {"1c", "2c", "3c", "4c", "5c", "6c", "1k", "2k", "3k", "4k", "5k", \ "6k"} s4 = Flatten@ Table[StringJoin[ToString /@ {nbr, ltr}], {ltr, s2}, {nbr, s1}] {"1c", "2c", "3c", "4c", "5c", "6c", "1k", "2k", "3k", "4k", "5k", \ "6k"} s5 = Flatten@ Thread@Outer[StringJoin, Sequence @@ Map[ToString, {s1, s2}, {2}]] {"1c", "2c", "3c", "4c", "5c", "6c", "1k", "2k", "3k", "4k", "5k", \ "6k"} s3 === s4 === s5 True Bob Hanlon ---- Leandro Tenfen <leandrotenfen at hotmail.com> wrote: ============= Hi, I have two lists: s1={1,2,3,4,5,6}; s2={c,k}; How can I concatenate elements of lists as follows: s3={1c,2c,3c,4c,5c,6c,1k,2k,3k,4k,5k,6k} Many Thanks!