带有极坐标的条形图，调整以在ggplot中逐渐变细

Question

我想使用ggplot创建一个得分图，就像您在角色扮演游戏中经常看到的那样，得分为正数和负数。

为此，我使用geom_col和coord_polar 。 问题在于，由于整个绘图空间坐标系统都发生了变形，因此条形图不是矩形而是梯形，这是预期的。

是否可以对此进行调整以具有适当的均匀条（并在图的中心添加一些空间以避免重叠）？

奖励请求：根据x轴上的值的数量，是否可以有一个多边形的网格而不是圆形的网格？

Answer 1

您可以使用线段代替条形图。 然后，厚度将取决于您选择的尺寸，而不是坐标系：

# sample dataset
set.seed(333)
n.dim = 9
df <- data.frame(
  x = paste("attribute", seq(1, n.dim), sep = "."),
  score = rnorm(n.dim)
)

ggplot(df,
       aes(x = x, y = score, 
           xend = x, yend = 0,
           col = score >= 0)) +
  geom_segment(size = 15) +                 # adjust size for different bar thickness
  scale_y_continuous(expand = c(0.1, 0)) +  # increase space at plot centre
  coord_polar() +
  theme_minimal() +
  theme(legend.position = "none",
        axis.title = element_blank(),
        axis.text.y = element_blank(),
        panel.grid.major.x = element_blank())

我认为多边形网格（而不是圆形网格）将更难以解释，因为距绘图中心的距离不再与y轴值具有一对一的关系。 （请参见下面的插图）可能有可能破解ggplot中类似于多边形网格的内容，但是我自己还没有看到任何这种实现。