DeleteAdjacentDuplicates
DeleteAdjacentDuplicates
DeleteAdjacentDuplicates[list]
删除 list 中相同元素的所有重复项.
DeleteAdjacentDuplicates[list,test]
对成对的连续元素应用 test 以确定它们是否应被视为重复元素.
更多信息
- DeleteAdjacentDuplicates[list] 删除 list 中出现的的所有相同元素，但第一次出现的元素除外.
- DeleteAdjacentDuplicates 也适用于关联关系.
- DeleteAdjacentDuplicates 从不重新排序元素，而只会删除它们.
- DeleteAdjacentDuplicates[list] 等价于 DeleteAdjacentDuplicates[list,SameQ].
范例
打开所有单元 关闭所有单元基本范例 (3)
DeleteAdjacentDuplicates[{3, 2, 2, 2, 3, 3, 1}]删除在 Equal 下重合的相邻元素：
DeleteAdjacentDuplicates[{3, 2., 2, 2`20, 3 / 2, 1.5, 1}, Equal]DeleteAdjacentDuplicates[<|a -> 1, b -> 1, c -> 2, d -> 2, e -> 1|>]范围 (2)
DeleteAdjacentDuplicates[{1, 3, 5, 4, 3, 4, 1, 9, 9, 7, 8}, Greater]在 DeleteAdjacentDuplicates[list] 中，list 可以是任何非原子表达式：
DeleteAdjacentDuplicates[f[x, x, y, y, y, x, x, y, z]]属性和关系 (2)
DeleteAdjacentDuplicates 与从 Split 中获取每个项的第一个类似：
list = RandomInteger[2, 20]Split[list][[All, 1]]DeleteAdjacentDuplicates[list]list = {{1, 2}, {0, 3}, {1, 1}, {2, 0}, {2, 1}}DeleteAdjacentDuplicates[list, Total[#1] == Total[#2]&]使用 SplitBy 也可以实现等效操作：
SplitBy[list, Total][[All, 1]]
Wolfram Research (2022)，DeleteAdjacentDuplicates，Wolfram 语言函数，https://reference.wolfram.com/language/ref/DeleteAdjacentDuplicates.html.
文本
Wolfram Research (2022)，DeleteAdjacentDuplicates，Wolfram 语言函数，https://reference.wolfram.com/language/ref/DeleteAdjacentDuplicates.html.
CMS
Wolfram 语言. 2022. "DeleteAdjacentDuplicates." Wolfram 语言与系统参考资料中心. Wolfram Research. https://reference.wolfram.com/language/ref/DeleteAdjacentDuplicates.html.
APA
Wolfram 语言. (2022). DeleteAdjacentDuplicates. Wolfram 语言与系统参考资料中心. 追溯自 https://reference.wolfram.com/language/ref/DeleteAdjacentDuplicates.html 年