如何使用 ggplot 制作 3D 堆叠条形图？

Question

我有这个数据框：

Name <- c("Present", "Extra", "Updated")
Gyor <- c(94143, 13691,12661)
Agglomeration <- c(58462, 20669, 6613)
df <- data.frame(Name, Gyor, Agglomeration)
print(df)

我想要的是像这样的 3D 堆叠条形图（使用 ggplot）

Answer 1

您不能使用

ggplot

生成 3D 图。有一些扩展包有点允许它，但这种类型的情节非常违背

ggplot

的整个精神。按照现代数据可视化标准，它会被认为是一种 糟糕 的数据呈现方式；很难准确读出并且看起来很过时。

此外，您问题中的数据可以很容易地绘制为 2d 堆积条（它没有足够的尺寸来允许像您所包含的那样的 3D 堆积条）

library(tidyverse)

ggplot(pivot_longer(df, -Name), aes(Name, value, fill = name)) +
  geom_col() +
  scale_fill_brewer(NULL, palette = 'Set1') +
  labs(x = NULL) +
  scale_y_continuous(labels = scales::comma) +
  theme_minimal(base_size = 16)