df>
commodity China Australia India Thailand ROW
<chr> <dbl> <dbl> <dbl> <dbl> <dbl>
1 Cereals 4.6 8.2 4.4 4.7 78.2
我有这个df,我需要绘制这些变量的饼图(不包括第一个)
library(tidyverse)
df %>%
select(-commodity) %>%
pivot_longer(cols = names(.)) %>%
ggplot(aes(x = value, y = 1, fill = name)) +
geom_col(position = "stack") +
coord_polar() +
theme_void()