通過函數將分配的對象保留在工作空間中

Question

我正在嘗試從函數中保留分配的對象（建立ts函數以開始對單變量過程進行建模，這很簡單！）。 我在尋找一種將對象保留在工作空間中的方法時遇到了麻煩。 僅使用for循環即可正常工作，但我想參數化以下內容：

ts.builder<-function(x,y,z){
  for(i in 9:13){
    assign(paste(x,i,sep="_"),ts(yardstick[1:528,i], freq=24))
    assign(paste(y,i,sep="_"),ts(yardstick[529:552,i], freq=24))
    assign(paste(z,i,sep="_"),ts(yardstick[1:552,i], freq=24))
  }
}

ts.builder("yard.book.training","yard.book.small.valid", "yard.book.valid")

有指針嗎？ 我認為它可能需要一個return語句，但是我還沒有發現這是有用的。

Answer 1

未經測試（可重現的示例有很大幫助）：

ts.builder <- function() {
  xd <- list()
  yd <- list()
  zd <- list()

  for (i in 9:13) {
    xd[[i]] <- ts(yardstick[1:528,i], freq=24)
    yd[[i]] <- ts(yardstick[529:552,i], freq=24)
    zd[[i]] <- ts(yardstick[1:552,i], freq=24)
  }
  list(yard.book.training=xd, yard.book.small.valid=yd, yard.book.valid=zd)
}

l <- ts.builder()

然后是返回值：

l$yard.book.training[[9]]

等等