Re: element selection
- To: mathgroup at smc.vnet.net
- Subject: [mg53651] Re: element selection
- From: hmichel at cox.net
- Date: Fri, 21 Jan 2005 06:36:35 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Peter:
How long is the list?
Don't know what you tried already but
DeleteCases[Level[Outer[(If[(#1 - #2) ≤ - 10, {#1, #2}])&, Range[30], Range[10, 40]], {2}], Null]
Range[30] is list 1
Range[10,40] is list 2
-10 is difference of list 1 and list 2 you want to set for equivalence relation test.
Time this and see if it works for your list.
Hans