【问题标题】:How to draw multiple pie chart in r如何在r中绘制多个饼图
【发布时间】:2017-09-25 09:22:17
【问题描述】:

我想使用 R 绘制一个多重饼图。我的数据包含 3 级信息,我想突出显示第三级的信息。比如我的样本量是48,在第一级分为12和36。然后,在第二级中将 12 分为 3 和 9,将 36 分为 24 和 12。在第三层,3进一步分为1和2,24又进一步分为15和9。我想呈现所有3层的数据,但只需要突出显示3和24的划分。

我正在考虑绘制一个多重饼图以在 R 中显示它,但我不知道 R 是否能够做到。因为我需要准确的百分比,所以我不能使用 Photoshop 来绘制图表。

如果 R 做不到,我想知道我可以用什么来绘制图表?任何帮助,将不胜感激。提前致谢!

【问题讨论】:

    标签: r pie-chart


    【解决方案1】:

    我刚刚找到了另一个答案,比ggplot2 简单得多。仍然假设你有这样的数据:

    > df = data.frame(type = c("A", "A", "B", "B", "B", "B"), subtype = c("X1", "X2", "X1.a", "X1.b", "X2.a", "X2.b"), value = c(12, 36, 3, 9, 24, 12))
      type subtype value
    1    A      X1    12
    2    A      X2    36
    3    B    X1.a     3
    4    B    X1.b     9
    5    B    X2.a    24
    6    B    X2.b    12
    

    你可以这样做:

    par(mfrow = c(1,2))
    pie(df[1:2,]$value, labels = df[1:2,]$subtype)
    pie(df[3:6,]$value, labels = df[3:6,]$subtype)
    

    结果实际上标注正确:

    【讨论】:

      【解决方案2】:

      由于您没有提供正确的示例数据,我将构建您描述的 3 步数据的 2 步版本。我将把它留给你概括。

      这是数据(注意,我将数据分为类型和子类型,并构建了一个三列数据集...您的最终版本将是相同的,但具有“C”类型和一些新的子类型):

      > df = data.frame(type = c("A", "A", "B", "B", "B", "B"), subtype = c("X1", "X2", "X1.a", "X1.b", "X2.a", "X2.b"), value = c(12, 36, 3, 9, 24, 12))
        type subtype value
      1    A      X1    12
      2    A      X2    36
      3    B    X1.a     3
      4    B    X1.b     9
      5    B    X2.a    24
      6    B    X2.b    12
      

      下面是我使用ggplot2 包制作饼图的方法:

      library(ggplot2)
      ggplot(df, aes(x = factor(1), y = value, fill = factor(subtype))) + 
          geom_bar(stat = "identity", width = 1) + 
          theme(legend.position = "none") +
          scale_x_discrete(NULL, expand = c(0,0)) +
          scale_y_continuous(NULL, expand = c(0,0)) + 
          coord_polar(theta = "y") +
          facet_wrap(~type)
      

      结果:

      【讨论】:

        猜你喜欢
        • 1970-01-01
        • 2021-04-21
        • 1970-01-01
        • 1970-01-01
        • 1970-01-01
        • 2014-02-09
        • 2018-01-17
        • 2022-08-13
        • 2019-07-25
        相关资源
        最近更新 更多