返回并计算向量的不同（可能重复）元素

Question

从这样的矢量开始：

vec <- c(1,1,1,2,2,7,2,2,2,1)

我需要返回向量的所有不同且可能重复的元素。在示例中，我想获得1, 2, 7, 2, 1。 很遗憾-unique-会返回1, 2, 7，这不是我需要的。

我还需要获得另一个向量，其中包含vec的每个元素，其元素重复的数量。在示例中，它将是3, 2, 1, 3, 1。

任何建议都受到高度赞赏。

Answer 1

请参阅?rle（运行长度编码）：

R> rle(vec)
Run Length Encoding
  lengths: int [1:5] 3 2 1 3 1
  values : num [1:5] 1 2 7 2 1