R语言

[yaduo1989]

想写个函数，把属于每天的数据筛选出来，然后汇总，但是总报错，说应该提供origin，我在每个日期里面都加上origin，结果又提示没有可供筛选的数据了。。。
我是编程小白，求大神指点
do<- function(start_date,end_date){
for (i in as.Date(start_date,origin="1970-01-01"):as.Date(end_date,origin="1970-01-01")){
data_interest[i]<- data_1[which(data_1$应还时间>= as.Date(i,origin="1970-01-01") & data_1$起息日<=as.Date(i,origin="1970-01-01")),]
s[i]<- round(sum(data_interest[i]$data1_inter)/10000,2)
i=i+1
}
}
do('2017-03-01','2017-03-31')

[大猫__0]

你可以用filter函数，直接就筛选出来了