如何仅在 Mathematica 中基于列表项的一部分删除重复项

How to delete duplicate based on a portion of list item only in Mathematica

我有以下数据集(仅显示快照)

data = {{0.1, 0.2, 5}, {0.1, 0.3, 7}, {0.2, 0.2, 1}, {0.1, 0.2, 9}}

也就是说数据的格式是{A,B,C}。 我只想删除基于 A 和 B 的重复项。 我希望输出为(有效删除示例中的最后一项)

{{0.1, 0.2, 5}, {0.1, 0.3, 7}, {0.2, 0.2, 1}}

DeleteDuplicates[data] 对我不起作用,因为它在重复检测和删除中使用了所有 A、B 和 C。

这在 DeleteDuplicates 的文档中或多或少有所解释。

DeleteDuplicates[data, Take[#1, 2] == Take[#2, 2] &]

应该做你想做的事:它定义了 data(#1 和 #2)的任意两个一级元素的相等函数作为前两个子元素的相等性元素(这就是 Take[ ..., 2] 所做的) .