今天我們學(xué)習(xí)繪制另一種柱狀圖，又稱為南丁格爾玫瑰柱狀圖廉白，如下圖所示个初。
南丁格爾玫瑰圖是弗羅倫斯·南丁格爾所發(fā)明的。又名為極區(qū)圖猴蹂。是?一種圓形的直方圖院溺。 南丁格爾自己常昵稱這類圖為雞冠花圖（coxcomb），并且用以表達(dá)軍醫(yī)院?季節(jié)性的死亡率磅轻，對象是那些不太能理解傳統(tǒng)統(tǒng)計(jì)報表的公務(wù)人員珍逸。
還是用我們上一次的測試數(shù)據(jù)逐虚。
library(ggplot2)
library(ggprism)
library(ggthemes)
data <- read.table("week.data.txt",header=T,sep="\t")
head(data)
先繪制一個基本的柱狀圖。
p<-ggplot(data, aes(x = day, y = time, fill = week_n)) +
geom_bar(stat = "identity", color = "white",
? ? ? ? ? lwd = 1, show.legend = FALSE,width = 0.6)+
scale_fill_prism(palette = "candy_bright")+
scale_x_continuous(breaks=seq(1,21,1),labels=data$week)+
theme_pander()+
theme(text = element_text(size = 15))
p
然后弄息，轉(zhuǎn)化為極坐標(biāo)，繪制成我們常見的南丁格爾玫瑰圖勤婚。
p+coord_polar()
