R 零IF语句的参数长度

我试图将我制作的表输出到pdf中以供分发，但是，参数长度始终为零，这是一个错误

我的df看起来像这样，但有80行长：

       DM   MPH_Over Variance
1    ATLR  1.8277662 9.972406
2    BAKA  2.9154519 6.692614
3    SERF  9.1898734 6.633396
4    DKRE  0.9621212 6.723101

我得到的代码如下

library(gridExtra)
names(dmover) <- c("DM","MPH_Over","Variance")

dmovertab <- as.data.frame(dmover[1,])
EmptyLine <- data.frame(DM = "",MPH_Over = "",Variance = "")

pdf(file = "q.pdf")

for (i in 2:nrow(dmover)) 
{
  if ((nrow(dmover$MPH_Over[i]))  ==  (nrow(dmover$MPH_Over[i-1])))
  {dmovertab <- rbind(dmovertab, dmover[i,])}

  else {
    dmovertab <- rbind(dmovertab, EmptyLine)
    dmovertab <- rbind(dmovertab, dmover[i,]) 
  }
}

grid.table(dmovertab,rows=NULL)
dev.off()

库（gridExtra）
名称（dmover）请查看
nrow（1:10）
和
nrow（1:10）=nrow（1:10）
和
nrow（1:10）
的结果。也许你只是想要[i]==dmover$MPH\u Over[i-1]

？这样做会将输出破坏为不可操作的PDF。但是没有任何错误。我通常使用

xtables

来输出latex表。更简单的方法是使用knitr和

kable

功能。有关使用rmarkdown的简单示例，请参阅。未定义列意味着您要求R对不存在的列进行子集。尝试删除

[]

和其中的任何内容，如

1:5

。当然可以。我试试你的方法。以前从未做过.rmd，所以希望我做对了