計算連續出現多少個數值的因子

Question

我正在計數給定變量連續出現值的次數。我想將這些值存儲在另一個變量中。它類似於這個問題here，但我想爲每個因素執行它 - 有超過75,000個不同的因素。

Answer 1

這是我使用的答案：我想要計算一個和零個字符串的數量，並使用下面的代碼。

out.full <- within(df, { 
smaller <- unlist(lapply(split(var1, var2), function(x) sequence(rle(x)$lengths))) 
cum.ones <- replace(smaller, var1 == 1,NA) 
cum.zeroes <- replace(smaller, var1 == 0, NA) 
rm(smaller) 
})