R 错误：尝试应用非功能（在8（C16.3）中：尝试应用非功能。）

我试图在R中运行以下代码，但出现了一个错误。错误状态：错误8（C16.3）：尝试应用非功能。 我试图将列数限制在2-8列，但我无法找到此代码的替代方案

FullDFI=NULL
for(i in 2:8(C16.3)){
   C1inact<-C1inactive 
   AntsDoingStuffTotal<-C16.3[,2:8][!is.na(C16.3[,2:8])]
   Numinactiveants<-length(C1inactive) 
   TotalNumAnts<-length(AntsDoingStuffTotal) 
   Propinactiveants<- Numinactiveants/TotalNumAnts 
   TimepointAsString<- (substr(colnames(C16.3)[2:8],2,nchar(colnames(C16.3)[2:8]))) 
   Timepoint<-as.numeric(TimepointAsString)
   CurrentDFI<- data.frame(Colony='C06_16_16.3', Task='i', PrePost='pre', 
                        Timepoint=Timepoint, PropInactiveAnts=Propinactiveants)
   FullDFI<-rbind(FullDFI, CurrentDFI)
}

FullDFI=NULL
对于（i在2:8（C16.3））中）{
C1inact
C16.3[2:8]
是您想要的，我怀疑，就像在
中（我在C16.3[2:8]中）一样。