在R中平滑一系列分類數據

Question

我的數據集中的一列是「Movement_Stats」，它包含「forward」，「backward」和「Stop」。每一行代表一個圖像幀。所以這個專欄看起來像：「前進，前進，前進，後退，前進，前進......」。我希望通過規則來平滑此列的分類值：

1. 對於每一行，檢查其前5行未來5行（它的鄰居）
2. 被重新分配該行的值其鄰居的多數票

我沒有找到任何包，我可以在R.

使用

Answer 1

您可以table使用rollapply從包zoo在一起：

mov <- c("forward", "backward", "stop") 
s <- sample(mov, 1000, replace = TRUE) 

zoo::rollapply(s,11, function(x) names(which.max(table(x))))