Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

split a list

• To: mathgroup at smc.vnet.net
• Subject: [mg40515] split a list
• From: Roberto Brambilla <rlbrambilla at cesi.it>
• Date: Wed, 9 Apr 2003 01:30:31 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

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

• Follow-Ups:
  • Re: split a list
    • From: Daniel Lichtblau <danl@wolfram.com>
  • Re: split a list
    • From: Dr Bob <majort@cox-internet.com>