用Facet包装创建饼图？

Question

如图所示，我设法创建了一个数据框架，但我不知道如何从中创建刻面饼图。有人可以告诉我如何吗？提前致谢。 在此处输入图像描述

Answer 1

我不确定您想显示什么，所以您可以做这样的事情：

df <- data.frame(rideable_type = c("classic_bike", "classic_bike", "docked_bike", "electric_bike", "electric_bike"),
                 member_causal = c("causal", "member", "causal", "causal", "member"),
                 number_of_bikes = c(1313878, 2013712, 308241, 1048194, 1250025),
                 total = c(2670303, 3263737, 2670303, 2670303, 3263737),
                 freq = c(49.2, 61.6, 11.5, 39.2, 38.3))


library(ggplot2)
ggplot(df, aes(x = factor(1), fill=factor(rideable_type))) + 
  facet_wrap(~member_causal) + 
  geom_bar(width = 1,position = "fill") + 
  coord_polar(theta="y") +
  labs(fill = "rideable type", x = "", y = "") 

^{在2022-07创建-08 by reprex软件包（v2.0.1）}