如何增加具有离散 x 轴的箱线图 (ggplot2) 之间的距离 - position_dodge?

How to increase the distance between boxplots (ggplot2) which have discrete x-axis - position_dodge?

我正在尝试更改 ggplot2 图中箱线图之间的距离。我有显示不同类别产品数据的箱线图。 类别(x 轴)是离散变量。 我试过 position_dodge 不影响箱线图之间的距离。当 x 轴是连续变量时它起作用。

当 x 轴离散时,哪个命令会增加箱线图之间的距离?

require(ggplot2)
dat<-rbind(data.frame(approach=1,product=1,value=seq(1,20,0.5)),
  data.frame(approach=1,product=2,value=seq(5,15,0.3)),
  data.frame(approach=1,product=3,value=seq(5,17,0.2)),
  data.frame(approach=2,product=1,value=seq(1,13,0.3)),
  data.frame(approach=2,product=2,value=seq(3,18,0.5)),
  data.frame(approach=2,product=3,value=seq(4,25,0.7)),
  data.frame(approach=3,product=1,value=seq(1,15,0.6)),
  data.frame(approach=3,product=2,value=seq(3,16,0.5)),
  data.frame(approach=3,product=3,value=seq(1,10,0.1)))
dat$product<-as.factor(dat$product)

gg1<-ggplot(dat,aes(x =product, y = value, width = 4)) +
     geom_boxplot(position=position_dodge(1))
gg1

不完全清楚但是...你想玩 width 吗?

geom_boxplot(width=0.5) 产生

geom_boxplot(width=0.1) 产生