R 警告要替换的项目数不是替换长度的倍数

问题描述

我如何消除下一个警告

在 abwc[i + 1]

    abwc <- 0

for (i in 1:(n - 1)) {
  
  deltatime <- as.numeric(difftime(Date_Time[i + 1],Date_Time[i],units='days'))
  abwc[i+1] <- abwc + (((Temp1[,i] + Temp1[,i + 1])/2 *  deltatime ) - 
                         ((Temp2[,i] + Temp2[,i + 1])/2 *  deltatime ))
}


TempsdataTUTL$ABWC <- abwc
TempsdataTUTL <- data.frame(TempsdataTUTL)
TempsdataTUTL 

ABWC<-  sum(TempsdataTUTL$ABWC)

round(ABWC,2)

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)