>test<-c(21,22,22,23,22,23,24)
>duplicated(test)
[1] FALSE FALSE TRUE FALSE TRUE TRUE FALSE
看得出duplicated()给出的是判断坐标：首次出现的22，函数给的值是F，但再次出现就成T了。
>indicator<-duplicated(test)
>table(test[indicator])
22 23
2 1
这是重复出现了几次(不包括首次)
所以你要的加1就行了。
>table(test[indicator])+1
22 23
3 2
seq函数是R语言中的基本函数，其功能是生成一个向量。使用方法如下：
seq(0,1,length.out=100)
上一行语句生成一个100个值的等差数列，首项为0，末项为1
拓展：
你还可以使用rep函数生成向量。
用法如下：
rep(0,100)
第一个位置表示重复的单元，第二个位置表示重复的次数。这样会生成一个100个0的向量。
