泊坞窗中的线性时间序列功能不起作用

Question

我有一个代码，必须使用线性时间序列函数拟合模型。但是，如下面的代码所示，我的线性函数不起作用，它引发了一个错误-找不到函数“线性” 。它在R提示符下运行得如何

library(forecast)
library(ggplot2)
library(MLmetrics)
setwd("C:/Documents/R with AIML")

 df<-read.csv("C:/Documents/Scrips & Data/DemandJavaTech.csv")
  demand<-ts(df,start=c(2016,4),end=c(2017,11),frequency=12)

  #Linear Model fitment

  accuracy<-c(1:4)
  for(i in 1:4){
    demand_linear<-linear(demand,m=i) #here the problem is
    accuracy[i]<-summary(demand_linear)$MAPE
  }
  accuracy

  demand_linear<-linear(demand,m=which.min(accuracy))
  summary(demand_linear)
  demand_linear_fit<-fitted.values(demand_linear)
  demand_linear_fit