建站
咨詢
售后
建站咨詢
新聞中心
這篇文章主要講解了“R語言可視化ggplot圖表系統(tǒng)中的輔助線有什么用”，文中的講解內容簡單清晰，易于學習與理解，下面請大家跟著小編的思路慢慢深入，一起來研究和學習“R語言可視化ggplot圖表系統(tǒng)中的輔助線有什么用”吧！
創(chuàng)新互聯(lián)建站專注于成都網(wǎng)站制作、成都網(wǎng)站建設、網(wǎng)頁設計、網(wǎng)站制作、網(wǎng)站開發(fā)。公司秉持“客戶至上,用心服務”的宗旨,從客戶的利益和觀點出發(fā),讓客戶在網(wǎng)絡營銷中找到自己的駐足之地。尊重和關懷每一位客戶，用嚴謹?shù)膽B(tài)度對待客戶，用專業(yè)的服務創(chuàng)造價值，成為客戶值得信賴的朋友，為客戶解除后顧之憂。
在之前的推送中，曾經(jīng)有過一篇介紹excel圖表輔助線的制作方法，其中用到的技巧五花八門、令人眼花繚亂。
而ggplot圖表系統(tǒng)中的輔助線添加起來卻異常簡單，非常易于操作。
這主要得益于ggplot函數(shù)系統(tǒng)的圖層控制理念以及該包的開發(fā)者很早就意識到圖表輔助線這一層面的圖表元素需求。
接下來我以幾個案例的形式對圖表輔助線操作進行演示：
library(ggplot2)
library(reshape2)
library(ggthemes)
data<-data.frame(Name = c("蘋果","谷歌","臉書","亞馬遜","騰訊"),Conpany = c("Apple","Google","Facebook","Amozon","Tencent"),Sale2013 = c(5000,3500,2300,2100,3100),Sale2014 = c(5050,3800,2900,2500,3300),Sale2015 = c(5050,3800,2900,2500,3300),Sale2016 = c(5050,3800,2900,2500,3300))
mydata<-melt(data,id.vars=c("Name","Conpany"),variable.name="Year",value.name="Sale")
ggplot(mydata,aes(reorder(Conpany,-Sale),Sale,fill=Conpany))+geom_bar(stat="identity")
以上柱形圖中，我們如果想要了解五個公司的銷售額均值以及單個公司銷售額與均值的對比情況，需要在圖表中添加一條平均線。
ggplot(mydata,aes(reorder(Conpany,-Sale),Sale,fill=Conpany))+geom_bar(stat="identity")+geom_hline(aes(yintercept=mean(Sale)),linetype=5,col="red")
以上通過geom_hline圖層為柱形圖添加了均值輔助線，但是大家一定好奇為啥均值線那么低，低于所有公司的銷售額，因為均值是季度均值，而銷售額是年度累計銷售額。
接下來我們制作一個分季度的柱形圖。
ggplot(mydata,aes(reorder(Conpany,-Sale),Sale,fill=Year))+geom_bar(stat="identity",position="dodge")+geom_hline(aes(yintercept=mean(Sale)),linetype=5,col="red")
當然這種均值線在分面狀態(tài)下也是可以添加的。
ggplot(mydata,aes(reorder(Conpany,-Sale),Sale,fill=Year))+geom_bar(stat="identity",position="dodge")+geom_hline(aes(yintercept=mean(Sale)),linetype=5,col="red")+facet_grid(.~Year)
輔助線在散點圖中也是經(jīng)常使用的一種圖表元素，它可以幫助我們對分布形態(tài)進行分割和歸納，使得數(shù)據(jù)分布形態(tài)及趨勢更加明顯。
接下來使用diamond數(shù)據(jù)集來展示散點圖中的輔助線。
ggplot(diamonds,aes(carat,price))+geom_point()
以上散點圖沒有很明顯的分散趨勢，不過為了演示散點圖中的輔助線，我還是將散點像素畫處理，給散點圖加上均值十字線。
ggplot(diamonds,aes(carat,price))+geom_point(shape=".")+geom_hline(aes(yintercept=mean(price)),linetype=5,col="red")+geom_vline(aes(xintercept=mean(carat)),linetype=5,col="red")
像素畫處理之后，再加上均值十字線，你可以清晰地看到，數(shù)據(jù)分布形態(tài)中，左下角最為密集。
輔助線的另外一種常見的用途就是在時間序列數(shù)據(jù)中。
ggplot(economics,aes(date,unemploy))+geom_line()
這里可以使用輔助線來標注我們最感興趣的時間點數(shù)據(jù)：
ggplot(economics,aes(date,unemploy))+geom_line()+geom_vline(aes(xintercept=as.numeric(start)),data=presidential)
> head(presidential)
name start end party
1 Eisenhower 1953-01-20 1961-01-20 Republican
2 Kennedy 1961-01-20 1963-11-22 Democratic
3 Johnson 1963-11-22 1969-01-20 Democratic
4 Nixon 1969-01-20 1974-08-09 Republican
5 Ford 1974-08-09 1977-01-20 Republican
6 Carter 1977-01-20 1981-01-20 Democratic
presidential數(shù)據(jù)集是一個美國歷屆總統(tǒng)的任期截止時間，通過添加總統(tǒng)任期時間點，我們甚至可以從經(jīng)濟波動數(shù)據(jù)中觀察到經(jīng)濟指標變波動與政治周期的關系。
start是一個代表日期的字段，也就是說我們可以賦值給geom_vline函數(shù)一個字段，從而在折線圖中繪制出多個時間點的輔助線。
感謝各位的閱讀，以上就是“R語言可視化ggplot圖表系統(tǒng)中的輔助線有什么用”的內容了，經(jīng)過本文的學習后，相信大家對R語言可視化ggplot圖表系統(tǒng)中的輔助線有什么用這一問題有了更深刻的體會，具體使用情況還需要大家實踐驗證。這里是創(chuàng)新互聯(lián)，小編將為大家推送更多相關知識點的文章，歡迎關注！
當前名稱：R語言可視化ggplot圖表系統(tǒng)中的輔助線有什么用
本文來源：http://fisionsoft.com.cn/article/gcppgh.html
