Cases and Nonatomic expression

*To*: mathgroup at smc.vnet.net*Subject*: [mg56718] Cases and Nonatomic expression*From*: Swati Shah <swatshah at gmail.com>*Date*: Wed, 4 May 2005 00:34:32 -0400 (EDT)*Reply-to*: Swati Shah <swatshah at gmail.com>*Sender*: owner-wri-mathgroup at wolfram.com

Hi Everyone I have a list k = {{1,1,2,2,3}, {1,2,2,2,3}, {2,3,3,3,3}, {5,2,2,2,1}, {6,1,1,1,1}, {6,1,1,1,1}} If the first element of the sublist is 1 I want to append the sublist to g1, if it starts with 2 then append g2 or starts with 6 then append to g6 I used cases and did the following: m1 = Cases[k, {1, __}]; m2 = Cases[k, {2, __}]; m3 = Cases[k, {3, __}]; m4 = Cases[k, {4, __}]; m5 = Cases[k, {5, __}]; m6 = Cases[k, {6, __}]; However, instead of typing each one of these lines separately, it would be nice to use just a simple Map or something or a for loop (as I have more than 50 different start values) I tried the following 2 ways: a) using a for loopFor [i = 1, i < 7, t = "g" <> ToString [i]; Print [t]; t = Cases [k, {i, __}]; Print [t] i++] However outside the for loop the values of g1..g6 is empty. b) I tried using MAP (in the similar way as the for) But I get the following error: Append::normal: Nonatomic expression expected at position 1 in Append[g1,{1, \ 168, 0.695873, 6.54462, 62.4578, 82.5056}] Any suggestions as to how I can get this working? Thanks in advance Swati

**Follow-Ups**:**Re: Cases and Nonatomic expression***From:*DrBob <drbob@bigfoot.com>

**Re: Cases and Nonatomic expression***From:*Chris Chiasson <chris.chiasson@gmail.com>

**Re: Cases and Nonatomic expression***From:*Andrzej Kozlowski <akoz@mimuw.edu.pl>

**Re: Cases and Nonatomic expression***From:*János <janos.lobb@yale.edu>