R执行报错：Error in `[<-.ts`(`tmp`,...only replacement of elements is allowed

转载

于 2018-08-22 10:30:00 发布 · 3.2k 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/xianhan/p/9516147.html

当尝试使用rbind函数时，如果遇到Time-Series类型的变量，会报'Error in `[<-.ts`: only replacement of elements is allowed'错误。解决办法是将Time-Series类型转换为double类型，例如使用as.double函数。参考链接提供了详细解决方案。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

原因：

pred$mean是Time-Series类型，rbind函数不支持。通过as.double将其转换成double类型即可。

修改前代码：

all_predata_time <- data.frame(pd=0.1,Row=1,preRow=0,pt=0.1,stasid='1',InitDate='1');
all_predata_time <- all_predata_time[-1,]

stasPowerPre_Time <- function(staid){
  testSrc<-......
  if(nrow(testSrc)>0)
  {
    maxDate <- max(testSrc$bizdate)
    tsd<- ts(testSrc$dp,start=c(2016,01,01),frequency=365)
    str(tsd)
    x <- ets(tsd)
    pred <- forecast(x,h=365)
    
    predata <- data.frame(pd = pred$mean)
    predata$Row <-as.integer(row.names(predata));
    predata$preRow <- predata$Row -1;
    predata$pt <- as.double(c(0));
    predata$stasid <- staid;
    predata$InitDate <- maxDate ;
    all_predata_time <<- rbind(all_predata_time,predata