我得到一个错误的论点是长度为零“当我尝试使用此:利率为什么R不接受此测试> 0?
mysize <- nrow(rates)
count <- 0
for(i in 1:mysize - 3) {
thisone <- Int[i+1] - Int[i]
nextone <- Int[i+2] - Int[i]
lastone <- thisone + nextone
if (lastone > 0){
count = count +1}
}
count
样品:
率 日期诠释 1月1日 - 1959年5.00 2月2日-1959 5.00 3月3日,1959年5.00 4月4日,1959年5.00 5月5日 - 1959 5.00 6月6日,1959年5.00 7月7日,1959年5.00
我看不到如何在这里得到答复的电子邮件通知..
啊...... Thom Quinn ..谢谢你。这就是答案。
对不起,在这里的混乱,董事会的格式和操作让我有点困惑,我想。约伯完成了。我会离开。
你可以发布'rates'的样本吗? – figurine
'1:mysize-3'!='1:(mysize - 3)' – scoa
也有矢量化的方法来做到这一点。看看'dplyr ::滞后()'和'dplyr ::铅()'比如 – scoa