根据R中的一列按周期读取数据帧

Question

我的R程序有问题。我在软件的外部选项中编写了一个程序。软件的生成周期为1到10。因此，我为此编写了一个周期。我的程序是：

#g1<-0
#save(g1,file = "g1.rdata")
load("g1.rdata")
ng0<-2100
ng<-2000
qtl <- read.table("C:/h / qtl.txt", skip=1)
if(g1>1){ID_QTL<-qtl[(ng0+ng*((g1-1)-1)+1):nrow(qtl),1]}
if(g1<=1){ID_QTL<-qtl[,1]}

我的问题是：有时ID_QTL是正确的，并且是int [1:4100] 25100 25101… ，有时是int [1:2] NA 25900.，25900是最后的ID_QTL。 你能解释一下吗？