ggplot画鸡冠花图

生信编程日常

发布于 2020-07-21 09:59:39

5330

发布于 2020-07-21 09:59:39

鸡冠花图，又称为玫瑰图，可以通过极坐标coord_polar()改变barplot来获得。

首先画一个简单的bar图

library(ggplot2)
bar <- ggplot(data = diamonds) +
geom_bar(
mapping = aes(x = cut, fill = cut),
show.legend = FALSE,
width = 1
) +
theme(aspect.ratio = 1) +
labs(x = NULL, y = NULL)

bar

通过coord_polar() 函数使用极坐标系将barplot改为鸡冠花图。

bar + coord_polar()

还可以通过调整width来调整距离,如将width改成0.5

library(ggplot2)
bar <- ggplot(data = diamonds) +
geom_bar(
mapping = aes(x = cut, fill = cut),
show.legend = FALSE,
width = 0.5
) +
theme(aspect.ratio = 1) +
labs(x = NULL, y = NULL)
bar + coord_polar()