错误：`position_jitterdodge()` 需要至少一种审美才能躲避答案

【问题标题】：Error: `position_jitterdodge()` requires at least one aesthetic to dodge by错误：`position_jitterdodge()` 需要至少一种审美才能躲避
【发布时间】：2020-10-01 22:19:43
【问题描述】：

我尝试绘制一个条形图分组图，但我不能，我的错误是， “position_jitterdodge() 至少需要一种审美才能躲过”。谁能帮我？这是我的数据示例和我尝试绘制条形图的代码。我的预期输出如下图。

library(ggpubr)

d<-data.frame(Average=c(3,1.5,4, 6,
                    2,5.4,3.1,0.9,
                    4.6,3.3,2.8,1.9,
                    2.1,3.7,4.4,5.2),
          Size=c("1750","1750","1750","1750",
                 "2000","2000","2000","2000",
                 "2500","2500","2500","2500",
                 "3000","3000","3000","3000"),
          Group=c("P1","P1","P1","P1",
                  "S1","S1","S1","S1",
                  "P2","P2","P2","P2",
                  "S2","S2","S2","S2"))


ggbarplot(
  d, x = "Size", y = "Average", 
  add = c("mean_sd", "jitter"), 
  add.params = list(shape = "supp"),
  fill= "Group", palette = c("#807F7F", "#BF504D"),
  position = position_dodge(0.8)
)

【问题讨论】：

您的示例不适用于您提供的数据。另外，你能确定你想要输出的样子吗？你想抖动和躲避什么？
ggbarplot 在哪个包中？直接在 ggplot2 中执行此操作会更干净。
包是ggpubr
@DaveArmstrong 认出了戴夫，谢谢

标签： r ggpubr

【解决方案1】：

您的代码有几个问题：

group 有 4 个值，只分配了 2 种颜色。
您的数据中不存在变量“supp”。

否则你的代码应该可以工作：

library(ggpubr)
#> Loading required package: ggplot2

d<-data.frame(Average=c(3,1.5,4, 6,
                        2,5.4,3.1,0.9,
                        4.6,3.3,2.8,1.9,
                        2.1,3.7,4.4,5.2),
              Size=c("1750","1750","1750","1750",
                     "2000","2000","2000","2000",
                     "2500","2500","2500","2500",
                     "3000","3000","3000","3000"),
              Group=c("P","P","S","S", "P","P","S","S", "P","P","S","S","P","P","S","S")
              )


ggbarplot(
  d, x = "Size", y = "Average", 
  add = c("mean_sd", "jitter"), 
  add.params = list(shape = "Group"),
  fill= "Group", palette = c("#807F7F", "#BF504D"),
  position = position_dodge(0.8)
)

^{由reprex package (v0.3.0) 于 2020 年 10 月 2 日创建}

【讨论】：