R 如何在函数中绘制插入符号序列对象

我想编写一个e函数，它使用插入符号包的

train

函数来训练回归模型，并绘制重采样配置文件。我的问题是没有显示绘图，也没有抛出错误。这应该是一个可复制的示例：

trFun <- function(){
  library( caret )
  library( mlbench )
  data( BostonHousing )

  lmFit <- train(
    medv ~ .,
    data=BostonHousing,
    method="pls"
  )

  #trellis.par.set( caretTheme() )
  plot( lmFit )

  lmFit
}

fit <- trFun()

plot( fit )

试试这个：

trFun <- function() {
  library( caret )
  library( mlbench )
  data( BostonHousing )

  lmFit <- train(
    medv ~ .,
    data=BostonHousing,
    method="pls"
  )

  #trellis.par.set( caretTheme() )
  print(plot( lmFit ))

  lmFit
}

trFun()

---

trFun谢谢。它可以工作，但问题可能是我必须打印出
绘图，因为它是
晶格
绘图。你能改变一下陈述吗
trFun <- function() {
  library( caret )
  library( mlbench )
  data( BostonHousing )

  lmFit <- train(
    medv ~ .,
    data=BostonHousing,
    method="pls"
  )

  #trellis.par.set( caretTheme() )
  print(plot( lmFit ))

  lmFit
}

trFun()