我正在使用Integrated()函数来计算一些树木的体积。它的结构差不多:
integrate(tapervol, LogsLength[,j] , LogsLength[,(j+1)], StandData1[,"Midh"], StandData1[,"Midd"])$value
位置:
关键是 LogsLength data.frame包含许多具有不同高度的列,我想以线性顺序模拟所有对(如代码中所述)。各行代表不同树木
我写了这样的循环:
for (j in 1:(ncol(LogsLength)-1)){
LogsVol[,j] <- integrate(tapervol, LogsLength[,j] , LogsLength[,(j+1)], StandData1[,"Midh"], StandData1[,"Midd"])$value
}
但是,它给了我错误
length(lower) == 1 is not TRUE
有人可以告诉我怎么了吗?
我感谢任何提示! 谢谢