Re: Make a nested list in a loop!
- To: mathgroup at smc.vnet.net
- Subject: [mg112281] Re: Make a nested list in a loop!
- From: Ray Koopman <koopman at sfu.ca>
- Date: Tue, 7 Sep 2010 06:08:34 -0400 (EDT)
- References: <i64keh$380$1@smc.vnet.net>
On Sep 6, 11:00 pm, Sebastian <sebpin... at googlemail.com> wrote:
> initdata = Import[datadir, "Data"];
> f = 1;
> Do[
> If[omin <= initdata[[e, 2]] <= omax, data[f] = initdata[e]; f = f +
> 1]
> , {e, 1, Length[initdata]}];
>
> Can someone please help, I'm trying to create a nested list from some
> data that is already as a nested list. Basically initdata has loads of
> rows but only 5 columns and looks as follow:
>
> {{a,b,c,d,e},{f,g,h,i,j},{k...etc.
>
> I'm trying to reduce the number of rows by comparing the 2nd column of
> each row to a predefined maximum and minimum (omax, omin
> respectively). Then if this value is accepted, the whole row gets
> nested into the new 'data' array.
>
> Running the code as is above I get the following errors:
>
> "Symbol::argx: Symbol called with arguments; 1 argument is expected"
>
> Thanks for any help in advance.
> Seb
data = Select[initdata, omin <= #[[2]] <= omax &]