Re: SameTest in Union

• To: mathgroup at smc.vnet.net
• Subject: [mg61123] Re: SameTest in Union
• From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
• Date: Tue, 11 Oct 2005 03:20:14 -0400 (EDT)
• Organization: Uni Leipzig
• References: <did38g\$qht\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

lst = {1.1101, 1.11095, 1.11076, 1.09, 2.3523,
2.352, 2.35211};

Union[ lst, SameTest -> (Abs[#1 - #2] < 0.025 &)]

Gruß

Jens

"Jack Goldberg" <jackgoldberg at comcast.net> schrieb
im Newsbeitrag news:did38g\$qht\$1 at smc.vnet.net...
| Hi Folks,
|
| I know there is a simple answer to this question
but the help index
| idoes not help!
|
| I have a list, something like this:
|
| lst = {1.1101, 1.11095, 1.11076, 1.09, 2.3523,
2.352. 2.35211}
|
| I want to remove from the list those entries
which are near each
| other but not identical, leaving only one
representative for each of
| these numbers.  One approach is to use  Union
with the option
| SameTest->???.   Here the same test might be
that the difference
| between entries is less than, say 10^(-2).   But
I can't seem to get
| SameTest to work.  So, what I want is
|
| Union[ lst, SameTest- > ?]
|
| so that  the union returns
|
| {1.1101,  2.35211}
|
| Here, I chose 2 representatives.  Any other
choice is OK;   say,
|
| {1.11095,  2.352}
|
| is also satisfactory.
|
| There may be other ways to do this, but I
thought of  Union  first.
| Perhaps, Cases  or Select  might be better.  Any
help is appreciated.
|
| Jack
|

```

• Prev by Date: Re: SameTest in Union
• Next by Date: Compile SparseArray help
• Previous by thread: Re: SameTest in Union
• Next by thread: Re: SameTest in Union