Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: DeleteCases

  • To: mathgroup at smc.vnet.net
  • Subject: [mg98193] Re: DeleteCases
  • From: dh <dh at metrohm.com>
  • Date: Thu, 2 Apr 2009 04:46:40 -0500 (EST)
  • References: <gqsn69$3qp$1@smc.vnet.net>


Hi Filippo,

hope you had a good sleep.

You may use Union with SameTest. The firstcase may be implemented by:

Union[yourList,SameTest->({#[[3]],#[[3]],#1[[1]],#1[[1]]}==#2)&]

if you want additionally the second test, you would append it in the 

function using Or (||).

Daniel



Filippo Miatto wrote:

> Dear all,

> Given this example list:

> 

> {{0, 0, 1, 1}, {0, 0, 2, 2}, {0, 0, 3, 3}, {1, 1, 0, 0}, {1, 1, 2, 2},  

> {1, 1, 3, 3}, {2, 2, 0, 0}, {2, 2, 1, 1}, {2, 2, 3, 3}, {3, 3, 0, 0},  

> {3, 3, 1, 1}, {3, 3, 2, 2}}

> 

> I need the elements {a,a,b,b} and {b,b,a,a} to be the same, i.e. i  

> want to delete one of the two occurrences from the list. (or all but  

> one if the condition is more complicated, say {a,b,c,d} and {b,a,c,d}  

> or {a,b,c,d} and {a,b,d,c})

> How can i do that? Can i use DeleteCases? if so, what conditional  

> should I use to compare different elements in the list?

> I tried without success for all the night.. (it's 6.15AM now!)

> Thank you,

> 

> Filippo

> 




  • Prev by Date: Re: eliminate x
  • Next by Date: Re: Footnotes, Endnotes in Mathematica
  • Previous by thread: Re: DeleteCases
  • Next by thread: Re: DeleteCases