R语言 APPLY函数出现$无法对原子向量起作用，应该如何解决？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

WINDOWS 10环境，R studio环境，想进行分组操作，如何列def1的i行和def1的上一行i-1行或者def2的i行和def1的上一行i-1行两者只有一个不满足，在def3【i】 的值就等于def【i-1】+1，代码如下：
mydata2$counts[1] <- 1
i <- as.numeric(character(nrow(mydata2)))
myfun2 <- function(mydata2,def1,def2,def3){
repeat {
     i <- i+1
    if(mydata2$def1[i] == mydata2$def1[i-1] && mydata2$def2[i] == mydata2$def2[i-1]){
      mydata2$def3[i] <- mydata2$def3[i-1]
    }else{
      mydata2$def3[i] <- mydata2$def3[i-1]+1
    }
   if(i == as.numeric(nrow(mydata2))) break
  }
}
apply(mydata2,1,myfun2,def1='small_startdate',def2 = 'small_enddate',def3 = 'counts')


返回错误：
Error in mydata2$def1 : $ operator is invalid for atomic vectors
请教应该如何修正或者编写。

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：分组操作

apply的用法不对吧，在看下参考文档

zhou1_20 发表于 2019-3-10 10:51
apply的用法不对吧，在看下参考文档

谢谢您的答复，请问如果我要实现目的。应该如何编写呢

zhou1_20 发表于 2019-3-10 10:51
apply的用法不对吧，在看下参考文档

数据大概是800万，使用FOR循环太慢了