ggplot2：使用geom_point和position_dodge时是否有消除形状失真的方法？

Question

我正在制作具有类别x变量且每个类别具有多个因子的图。我使用类似于以下帖子的geom_point和position_dodge：ggplot2: geom_point() dodge shape but NOT color。如果仔细查看该帖子中创建的图，您会发现，当xVar = C时，“ +”点不是对称的，因为右线和底线比顶线和左线长。对于简单的图来说，这也许没什么大不了的，但是我有一个相当复杂的图。我有一个使用grid_arrange的3 * 3多图。该多图共有81个点，每个点都有误差线。扭曲的点不在许多误差条上居中，因此在我的情况下，这个问题确实很突出。也许这与在grid_arrange中使用position_dodge有关。

我尝试将图像导出为不同的文件类型（例如jpg，png，pdf）。

以下是上述链接中的一些代码：

x=tibble(Color=c(rep('A',12),rep('B',12),rep('C',12)),
     Shape=rep(c(rep('A',3),rep('B',3),rep('C',3),rep('D',3)),3),
     xVar=rep(c('A','B','C'),12),
     Value=rnorm(36))

ggplot(x,aes(xVar,Value,color=Color,shape=Shape))+
     geom_point(position=position_dodge(width=.5))

ggplot(x,aes(xVar,Value,color=Color,shape=Shape,group=Shape))+
  geom_point(position=position_dodge(width=.5))

我想具有不会变形的geom_point形状。