R 用于计算序列长度的包或函数？

我想知道R中是否有计算序列长度的包或泛型函数。 例如，如果我输入一个序列

---

s1那些疯狂打字的人肯定去了别处：

 s1<- c('a','a','b','a','a','a','b','b')
 F1 <- function(s, el) {rle(s)$lengths[rle(s)$values==el] }
 F1(s1, "a")
#[1] 2 3
 F1(s1, "b")
#[1] 1 2

---

那些疯狂打字的人一定去了别的地方：

 s1<- c('a','a','b','a','a','a','b','b')
 F1 <- function(s, el) {rle(s)$lengths[rle(s)$values==el] }
 F1(s1, "a")
#[1] 2 3
 F1(s1, "b")
#[1] 1 2

---

现在有几个人正在疯狂地以最快的速度输入关于rle的信息。太好了，我应该记得的。谢谢。我们中的一些人已经写了sekle，可以搜索重复或序列。例如：+1。我很惊讶这个问题以前没有被否决。这样我就不用发帖和/或花很多时间工作了。我从来没有听说过这个功能。现在有几个人正在疯狂地以最快的速度打字，告诉你关于rle的事情。太好了，我应该记得的。谢谢。我们中的一些人已经写了sekle，可以搜索重复或序列。例如：+1。我很惊讶这个问题以前没有被否决。这样我就不用发帖和/或花很多时间工作了。我从没听说过这个函数。