Re: create character listing
- To: mathgroup at smc.vnet.net
- Subject: [mg112573] Re: create character listing
- From: Patrick Scheibe <pscheibe at trm.uni-leipzig.de>
- Date: Mon, 20 Sep 2010 05:44:30 -0400 (EDT)
Hi, create a list of all tuples of length 3 from the set of characters {"a",...,"z"} and then split this list at "bzz" tuples = Tuples[CharacterRange["a", "z"], 3]; words = Map[StringJoin, tuples]; posOfbzz = First@Flatten[Position[words, "bzz"]]; TableForm[Take[words, posOfbzz]] or as one-liner Take[#, First@Flatten[Position[#, "bzz"]]] &@(StringJoin @@@ Tuples[CharacterRange["a", "z"], 3]) Cheers Patrick On Sun, 2010-09-19 at 05:38 -0400, shippee wrote: > What would be the best way to create a character/string listing of all > values in columnar format from "aaa" through "bzz"? I'd like to end > up with something like: > > aaa > aab > aac > ... > ... > bzz > > Thanks in advance, I've been away from Mathematica for a couple of > years and forgotten almost everything I'd ever learned, so I'm > starting over. All I could find in searching this list was variations > on the distribution of "abc", if I missed a more on point posting > please point me in the right direction. >