是否有 R 函数来标准化饼图中的高度?
Is there an R function to normalize height in a pie chart?
我正在尝试比较 ggplot2 中的两个饼图,但是当我尝试绘制它时,由于数据集的长度差异很大,它看起来很小。
我想要饼图按类别划分,按类别划分。
df %>%
count(category,group) %>%
ggplot(aes(x="", y=n, fill=factor(group))) +
geom_bar(stat="identity", width=1) +
coord_polar("y", start=0) +
facet_wrap(~category)
我做了以下操作来标准化他们的身高。
Piechartdf <- df %>%
count(category,group)
Piechart <- Piechart %>%
mutate(proportion = case_when(
Type=="category1" ~ n/sum(Piechart[which(Piechart$Type == "category1"), 3]),
Type=="category2" ~ n/sum(Piechart[which(Piechart$Type == "category2"), 3])
))
然后在第一个中,我只是偶然n个比例,有没有更简单的方法来实现这个?
你可以试试
df %>%
count(category,group) %>%
group_by(category) %>%
mutate(n = n/sum(n)) %>%
ggplot(aes(x="", y=n, fill=factor(group), group = category)) +
geom_bar(stat="identity", width=1)+
coord_polar("y", start=0) +
facet_wrap(~category)
我正在尝试比较 ggplot2 中的两个饼图,但是当我尝试绘制它时,由于数据集的长度差异很大,它看起来很小。
我想要饼图按类别划分,按类别划分。
df %>%
count(category,group) %>%
ggplot(aes(x="", y=n, fill=factor(group))) +
geom_bar(stat="identity", width=1) +
coord_polar("y", start=0) +
facet_wrap(~category)
我做了以下操作来标准化他们的身高。
Piechartdf <- df %>%
count(category,group)
Piechart <- Piechart %>%
mutate(proportion = case_when(
Type=="category1" ~ n/sum(Piechart[which(Piechart$Type == "category1"), 3]),
Type=="category2" ~ n/sum(Piechart[which(Piechart$Type == "category2"), 3])
))
然后在第一个中,我只是偶然n个比例,有没有更简单的方法来实现这个?
你可以试试
df %>%
count(category,group) %>%
group_by(category) %>%
mutate(n = n/sum(n)) %>%
ggplot(aes(x="", y=n, fill=factor(group), group = category)) +
geom_bar(stat="identity", width=1)+
coord_polar("y", start=0) +
facet_wrap(~category)