运行ggside包函数时出现scales_add_defaults缺失错误求助

问题重现 #

运行ggside官方vignette中的示例代码：

i2 <- iris %>%
  mutate(Species2 = rep(c("A","B"), 75))
p <- ggplot(i2, aes(Sepal.Width, Sepal.Length, color = Species)) +
  geom_point()
p2 <- p + geom_xsidedensity(aes(y = after_stat(density))) +
  geom_ysidedensity(aes(x = after_stat(density))) +
  theme_bw() 

p2

触发如下错误：

Error in `geom_xsidedensity()`:
! Problem while computing aesthetics.
ℹ Error occurred in the 2nd layer.
Caused by error in `scales_add_defaults()`:
! could not find function "scales_add_defaults"

问题根源 #

scales_add_defaults是scales包的内置函数，报错核心原因是你的scales包版本过旧——ggside的新版功能依赖scales包的较新特性，旧版scales中没有这个函数。此外，也可能是ggside与ggplot2、scales的版本不兼容导致的。

解决步骤 #

• 第一步：更新scales包
  直接在R中执行以下命令更新：

  install.packages("scales")
  

• 第二步：若更新scales后仍报错，同步更新ggplot2和ggside
  确保核心依赖包版本匹配：

  install.packages(c("ggplot2", "ggside"))
  

• 第三步：若使用开发版ggside，重新从GitHub安装
  如果你之前装的是ggside的开发版，可能需要重新拉取最新代码：

  # 先安装devtools（如果没装过）
  install.packages("devtools")
  devtools::install_github("jtlandis/ggside")
  

验证 #

重新运行示例代码，若成功生成带有侧边密度曲线的散点图，说明问题已解决。

内容的提问来源于stack exchange，提问作者llewmills