我想使用 ggplot。在函数中预测(从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))
MrFlick在评论中回答:
与其使用addlayer=
,不如尝试在ggplot()
调用后添加+ labs(title=ttl)
:
p.plot <- function(pred, ttl) {
ggplot(pred) +
labs(title=ttl)
}