使用範圍：
玫瑰花圖，可謂是餅圖，柱形圖的升級版，它更具直觀，主要用於分佈情況的展示。
上代碼：
<code>install.packages("ggplot2")
install.packages("scales")
library(ggplot2)
library(scales)
data /<code>結果1：
'data.frame': 12 obs. of 4 variables:
$ city : Factor w/ 12 levels "衢州","紹興",..: 12 11 10 9 8 7 6 5 4 3 ...
$ p2015: num 0.464 0.524 0.524 0.496 0.505 ...
$ p2016: num 0.585 0.614 0.591 0.555 0.562 ...
$ diff : num 0.1216 0.0896 0.0669 0.0589 0.0565 ...
繪製常規柱形圖：
<code>p geom_bar(stat="identity") +geom_text( aes(x=city, y=diff, label=percent(diff)),
size=4, vjust=-1,fontface="bold")+theme_bw()+theme(legend.position ="none")
p1 p1/<code>
結果2：
繪製玫瑰花圖：
<code>p2 theme(axis.text.y = element_blank()) +
theme(axis.ticks = element_blank()) +
theme(panel.border = element_blank()) +
theme(plot.title = element_text(hjust=0.5,vjust = -330, size=14,face = "bold") )+
theme(axis.text.x=element_text(size=12,face="bold"))
p2/<code>
結果3：
其他實現代碼:
<code>install.packages("tidyr")
library(tidyr)
data2 pb geom_bar(stat="identity")+coord_polar()+theme_minimal()+labs(x = "", y = "")+
theme(axis.text.y = element_blank()) +
theme(axis.ticks = element_blank()) +
theme(panel.border = element_blank()) +
theme(axis.text.x=element_text(size=12,face="bold"))
pb/<code>往期回顧：
酷炫樹狀圖（R語言）
臨床試驗樣本量評估（R語言）
基於逆概率加權的生存曲線校正 （R語言）
小提琴圖（R語言）
列線圖 nomogram（R語言）
森林圖（R語言）
生存曲線 （R語言）
SCI寫作神器： AI幫你寫論文
SCI寫作神器： 改寫助手
分享到:
閱讀更多 DrMaxChen 的文章
