用visreg控制刻面列数

虽然我喜欢使用package

visreg

可视化我的回归，但有一件事我还无法控制：刻面时的列数。例如，请参见以下曲线因子广义相加回归：

library(dplyr)
library(mgcv)
library(visreg)
data(airquality)
test <- gam(
    Ozone ~ s(Temp, by = Month),
    data = airquality %>% mutate(Month = as.factor(Month))
)

我通过曲线得到一个1行5列的因子

有趣的是，如果我把

gg=TRUE

去掉，它就会变成两行。但无论是哪种情况，我都希望能够控制刻面时的列数和行数。到目前为止，我没有成功，要么操纵

visreg

的省略号参数，要么直接尝试操纵生成的

ggplot

对象

---

例如，如果我想用

gg=TRUE

做

visreg

，用3行2列，我最好的机会是什么？或者有其他推荐的软件包吗？

你可以修改ggplot对象，然后用通常的方式添加

facet\u wrap

：

p <- visreg(test, xvar = "Temp", by = "Month", gg = TRUE)
p + facet_wrap(vars(Month), nrow = 3)

p <- visreg(test, xvar = "Temp", by = "Month", gg = TRUE)
p + facet_wrap(vars(Month), nrow = 3)

visreg(test, xvar = "Temp", by = "Month", gg = TRUE) +
  facet_wrap(vars(Month), nrow = 3)