如何删除一行

Question

for (i in 2:nrow(fox)) {
  temp = fox[i,c(7:18)]
  check = (temp==0)
  if(all(check))
    new <- fox[-c(i),]
  else
print('okay')

}

我正在写这个R代码块，基本上从数据帧'fox'中删除一行，如果所有列都是0.它似乎正在工作，除了'新'数据帧只是缺少第一个行，但也必须省略很多行。知道错误是什么以及如何纠正它。