维特比算法后处理

Question

我正在为隐藏马尔可夫模型中的项目运行脚本，在学校有2个隐藏状态。在某些时候，我使用维特比的算法来找到最合适的隐藏状态序列。我的输出是这样的矢量：

c("1","1","1","2","2","1", "1","1","1","2", "2","2")

我想计算每个州有多少个子序列，并记录它们的长度和位置。例如，输出将是这样的matrx：

State   Length  Starting_Position
1        3      1
2        2      4
1        4      6
2        3      10

是否有任何R命令或包可以轻松完成？

谢谢。