现有一个向量1，2，3，3，3，3，2，1，5，5，5，2，2，2，2，2 如何编写R代码提取出向量中连续相等的4个及4个以上元素？
如这个例子中得到的结果应为3，3，3，3，2，2，2，2，2
求大神代码，紧急在线等，万分感谢！！！