在R中压缩字符串[重复]

Question

我有一大串只包含以下字符的字符串

"M", "D", "A"

如：

 "M" "M" "A" "A" "D" "D" "M" "D" "A"

我想把它压缩成：

M2A2D2M1D1A1 

在 R. 谷歌搜索已将我带到 this（一个 java 解决方案），但在实施它之前，检查我是否可以在网上找到准备好的东西会很有趣。谢谢！

Answer 1

R 函数rle() 是你的朋友。

testVector <- sample(c("M", "D", "A"), 20, replace=T)
res <- rle(testVector)
compressedString <- paste(res$values, res$lengths, collapse = "", sep = "")