r - 在数值向量中查找模式

Question

我有一个测量人们职业的数据集。该职业在一整天内每 15 分钟测量一次，这会产生一个由 96 个字母组成的字符串(例如 ARCCCRTOHGDERRRRYYYIJ...)，其中每个字母代表某种职业。

其中一个字母 (C) 代表从家到工作的交通工具，反之亦然，这让我可以区分在家和工作。

为了识别该传输，我使用了

Newdata<-Data%>%
mutate(transport = as.character(gregexpr(pattern="C",String)))

结果如下:

c(31,32,33,58,59)

在这种情况下，我会知道他们在时间 31 之前和时间 59 之后在家。las，人们有可能在晚上工作，这会导致:

c(44,45)

显然，有些人去上类，回家然后再去上类(反之亦然)

c(7,8, 31,32, 75,76)

我需要一种方法来查看第一个向量中有 2 个连续数字系列，第二个向量中只有一个系列，第三个向量中有三个系列。

Answer 1

要检测具有连续数字的系列数(这些数字在您的向量中总是增加)，您可以这样做:

foo <- function(x) sum(rle(diff(x))$values==1)

#> foo(c(31,32,33,58,59))
#[1] 2
#foo(c(44,45))
#[1] 1
#foo(c(7,8, 31,32, 75,76))
#[1] 3