在R中用命令处理coefplot软件包中的错误

Question

在Rpackage coefplot中运行命令coefplot时，是否有人面临与我相同的情况？

即使是在这个例子中：

data(diamonds)
model1 <- lm(price ~ carat + cut, data=diamonds)
model2 <- lm(price ~ carat + cut + color, data=diamonds)
model3 <- lm(price ~ carat + color, data=diamonds)
multiplot(model1, model2, model3)

我现在得到了以下错误：

Error in get(x, envir = this, inherits = inh)(this, ...) : 
attempt to apply non-function

有什么暗示吗？

Answer 1

这个答案有点切分，但我发现broom和dotwhisker包最近的组合是有用的-- broom是后端(将模型转换为“整齐”的系数数据帧)，dotwhisker是前端(通过相当薄的ggplot2层创建绘图)。

library(ggplot2)
library(dotwhisker)
library(broom)

update：重新安装dotwhisker v0.2.0.3，这似乎有效：

dwplot(list(model1,model2,model3))

如果您想要动态选择不同的模型名称，也可以使用dwplot(list(m1=model1,m2=model2,m3=model3))。

或者，对于更精细的控件，您可以自己构建完整的数据框架：

mList <- list(carat_cut=model1, carat_cut_color=model2,
              carat_color=model3)
library(plyr)
## extract tidy data frames and combine them ...
mFrame <- ldply(mList,tidy,conf.int=TRUE,.id="model")

现在你可以做了

dwplot(mFrame)