ggplot.Predict的标题中的变量

Question

我想在函数中使用ggplot.Predict（来自rms包）来自动生成图形：

library(rms)

ddist <- datadist(iris); options(datadist="ddist")

mod <- ols(Sepal.Length ~ Petal.Length, data=iris)

p.plot <- function(pred, ttl) {
          ggplot(pred, 
          addlayer=labs(title=ttl))
}

plot.title <- "Sepal length"

p.plot(Predict(mod), plot.title) 

这将导致“实验室错误（标题= ttl）：未找到对象'ttl'”。

ggplot(Predict(mod), addlayer=labs(title=plot.title)) 

Answer 1

在评论中得到MrFlick的答复：

而不是使用addlayer=，而是尝试在+ labs(title=ttl)调用之后添加ggplot()：

p.plot <- function(pred, ttl) {
          ggplot(pred) +
              labs(title=ttl)
}