如何删除连续相同变量

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

现在有一组高频数据，选择TkTS方法测定实际波动率。所以需要删除连续的重复值，

例如 1 1 2 3 1 1 这组数据中，删除第二个1和最后一个1，但是第四个一需要保留。


不知道哪位前辈可以指点一下如何删除连续的重复值。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：最后一个 高频数据 重复值 不知道 波动率 如何

xuenesta 发表于 2015-8-19 23:31
现在有一组高频数据，选择TkTS方法测定实际波动率。所以需要删除连续的重复值，

例如 1 1 2 3 1 1 这组数 ...

Unique

1. se<-c(1,1,2,3,1,1)
   
2. run<-rle(se)
   
3. len<-cumsum(run$lengths)[run$lengths>1]
   
4. sen<-se[-len]

复制代码

十里春风 发表于 2015-8-20 10:17

这样的话如果有三个连续的数字只能删除一个

1. se<-c(1,1,2,2,3,3,3,1,1,1)
   
2. se1=se[2:length(se)]
   
3. se2=se[1:(length(se)-1)]
   
4. se[-which(c(FALSE,se1==se2))]

复制代码

1. remove_dup <- function(x) x[c(1, which(diff(x) != 0) + 1)]
   
2. 
   
3. remove_dup(c(1, 1, 2, 3, 1, 1))
   
4. 
   
5. remove_dup(c(2, 2, 3, 3, 1, 1, 2, 3, 1))

复制代码

亚米UM 发表于 2015-8-20 01:00
Unique

谢谢前辈！

十里春风 发表于 2015-8-20 10:17

谢谢前辈啦！

十里春风 发表于 2015-8-20 10:17

非常感谢！

十里春风 发表于 2015-8-20 22:23

太谢谢啦！