南丁格尔玫瑰图是一种条形图的变形图,也被称为极坐标柱形图,普通的柱形图的坐标系是直角坐标系。该图形使用圆弧的半径长短来表示数据的大小,适合较多类别数据的比较。最近在撰写年度工作总结中使用了一部分,在此将代码分享,有需要者可复制使用!
这里我们构造一份传染病数据:
myda<-data.frame(
disease=c("流感","感染性腹泻","手足口病","新冠肺炎","病毒性肝炎","急性出血\n性结膜炎",
"梅毒","肺结核","淋病","流行性\n腮腺炎","百日咳","艾滋病","登革热","水痘","猩红热",
"伤寒","布病","痢疾"),
ynn=c(2000,1500,1000,920,800,720,630,510,420,360,290,210,
150,88,68,47,30,9)
)
首先我们绘制最基础的环形条形图:
library(ggplot2)
ggplot(data = myda,aes(x=reorder(disease,-ynn),y=ynn))+
geom_bar(width =