如何使用R在向量中运行数字

Question

让我们考虑一个向量x，其中

 x=c(1,2,2,2,2,3,3,4,5,5,5,6,7,7,7).

我想从上面的向量中获取运行向量（y），即

y= 1 4 2 1 3 1 3.

我认为R中可能有一个函数来执行此任务，但我没有这个功能。有人可以建议我在R中执行此任务的功能。提前感谢。