Re: split a list
- To: mathgroup at smc.vnet.net
- Subject: [mg40548] Re: [mg40515] split a list
- From: "Y.A.Tesiram" <yas at pcomm.hfi.unimelb.edu.au>
- Date: Wed, 9 Apr 2003 20:28:40 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
One way,
u = Select[r, # < m]
v = Select[r, # >= m]
Hope this helps.
Yas
On Wed, 9 Apr 2003, Roberto Brambilla wrote:
> Hi,
>
> I have a list (very long, thousands, and unsorted) of numbers r={n1,n2...}
> and for a given a number m I want to split it in the two sublists
> (unsorted, same order) u={elements<m], v={elements>m}.
> Now I use this *old-style* method:
>
> u = v = {};
> For[i = 1, i <= Length[r], i++,
> tmp = r[[i]];
> If[tmp > m , AppendTo[u, tmp], AppendTo[v, tmp]];
> ]
>
> Any suggestion for a more efficient (and elegant) method?
> Also oneliners are well accepted.
>
> Many thanks, Roberto
>
> Roberto Brambilla
> CESI
> Via Rubattino 54
> 20134 Milano
> tel +39.02.2125.5875
> fax +39.02.2125.5492
> rlbrambilla at cesi.it
>
>
>