r - geom_bar(aes = ) 和 position_dodge(width = ) 中的 'width = ' 是用什么单位渲染的？

Question

我想在其中一个闪避条上专门放置一些东西，我该怎么做？

在下面的示例中，我想在条形图的 cat3 组中的 A3 上专门放置一些东西。我知道 cat3 的 x = 3 但由于闪避宽度和条宽的相互依赖性，似乎很难瞄准那个条。有什么公式可以用来计算x坐标吗？我在下面提供了示例代码。谢谢

x1 <- c(15,75,28,60,80,100)
x2 <- c('cat1','cat2','cat3','cat1','cat2','cat3')
x3 <- c('A1','A2','A3','A4','A1','A2')
data=data.frame(cbind(x1,x2,x3),stringsAsFactors = F)
data$x1 <- as.numeric(data$x1)
data$x2 <- factor(data$x2)
data$x3 <- factor(data$x3)

ggplot(data,aes(y = x1, x = x2)) + geom_bar(stat = 'identity', 
                                 aes(fill = data$x3, width = 0.5), 
                                 position = position_dodge(width = 0.8))

Answer 1

position_dodge() 中的width 参数指定了左侧条的最左侧边缘与右侧条的最右侧边缘之间的距离。闪避宽度为 0.8 时，x3 类别的起点 x = 3 与任一条形图边缘之间的距离为 0.4(右侧为 +0.4，左侧为 -0.4)0.4 的一半(即 0.2)将将您带到条形图的中点(右侧再次为 +0.2，左侧为 -0.2)。无论条形宽度如何，都是如此。

这是一个示例，其中我在 cat3 的右侧栏上绘制了一个 H。 y 单位与 y 轴上的单位对齐。

ggplot(data,aes(y = x1, x = x2)) + 
    geom_bar(stat = 'identity',
             aes(fill = x3, width = 0.5), 
             position = position_dodge(width = 0.8))+
    geom_text(aes(x = 3.2, y = 25, label = "H"), size = 10)