您好,登錄后才能下訂單哦!
小編給大家分享一下Top50ggplot2Visualizations如何實現面積圖,相信大部分人都還不怎么了解,因此分享這篇文章給大家參考一下,希望大家閱讀完這篇文章后大有收獲,下面讓我們一起去了解一下吧!
公眾號里有朋友提問——在散點圖添加擬合曲線的圖中如何添加一條虛線對角線?
就是由圖A變成圖B;應該有很多方法可以實現,這里我使用geom_segment()
函數geom_segment()
函數需要四個參數:起點位置坐標和終點位置坐標,默認是實線;通過linetype
參數修改線型。
上面圖片的實現代碼
head(cars)
library(ggplot2)
p1<-ggplot(cars,aes(x=speed,y=dist))+
geom_point()+
geom_smooth(method = "lm",se=F)+
theme_bw()
p2<-ggplot(cars,aes(x=speed,y=dist))+
geom_point()+
geom_smooth(method = "lm",se=F)+
theme_bw()+
geom_segment(aes(x=0,xend=25,y=0,yend=120),
linetype=2)
ggpubr::ggarrange(p1,p2,ncol=2,labels = c("A","B"))
原文地址 http://r-statistics.co/Top50-Ggplot2-Visualizations-MasterList-R-Code.html
今天重復這個教程中的第二幅圖 Area Chart
直譯過來是面積圖
面積圖通常是用來展示某個指標和某個基準線來比較,比如股票的收益率(such as % return from stock)可以用geom_area()
函數來實現。
完整代碼
library(ggplot2)
library(quantmod)
economics$returns_perc <- c(0, diff(economics$psavert)/economics$psavert[-length(economics$psavert)])
ggplot(economics[1:100,],aes(date,returns_perc))+
geom_area(fill="darkgreen",alpha=0.8)+
theme_bw()+
theme(axis.text.x = element_text(angle=90,vjust=0.5))+
labs(title = "Area Chart",
subtitle = "Perc Returns for Personal Savings",
y="% Returns for Personal savings",
caption="Source: economics")
以上是“Top50ggplot2Visualizations如何實現面積圖”這篇文章的所有內容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內容對大家有所幫助,如果還想學習更多知識,歡迎關注億速云行業資訊頻道!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。