Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/68.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
为什么赢了';t R接受此测试,以获得>;0?_R - Fatal编程技术网

为什么赢了';t R接受此测试,以获得>;0?

为什么赢了';t R接受此测试,以获得>;0?,r,R,当我尝试使用此选项时,出现错误“参数长度为零”: 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 mysize键入1:mysize

当我尝试使用此选项时,出现错误“参数长度为零”:

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

mysize键入
1:mysize-3
时,R创建向量
1:mysize
,然后从该向量中的每个元素中减去3。你想要的是
1:(mysize-3)

你能发布一个
费率的示例吗?
1:mysize-3
!=<代码>1:(mysize-3)
还有一些矢量化的方法可以实现这一点。查看
dplyr::lag()
dplyr::lead()
例如>>费率日期:1959年1月1日5.00 1959年2月2日5.00 1959年3月3日5.00 1959年4月4日1959年5.00 1959年5.00 5.00 6月6日1959年5.00 7月7日1959年5.00我想我的这个问题一定是我不能发布更多问题的原因。但我不知道该怎么办。它不会让我删除它。我早在2016年12月就写过了——当我真的发布它时,似乎——我已经得到了答案,并为发布它说了“对不起”。。我还能做什么?