R：返回具有多次出现的唯一整数向量的函数

提示： 给定一个整数向量，编写一个函数，返回那些多次出现的唯一整数向量，并将结果放入数据帧中

我不知道如何分离多次出现的整数。可能使用独特的功能

我想我会想用如下方式显示结果：

table()
as.data.frame(table())

---

任何帮助都将不胜感激

也许你可以考虑发布一个带有样本输入和输出的可复制示例？不需要太复杂，

result=2

你就完成了。我很惊讶

rle

解决方案实际上相当快。

> sample(1:10, 10, replace=TRUE) -> x
> x
 [1]  5  3  2 10 10  5  9  5  5  6
> y <- rle(sort(x))
> y$values[y$lengths > 1]
[1]  5 10
> y$lengths[y$lengths > 1]
[1] 4 2

> table(x)[table(x) > 1]
x
 5 10 
 4  2