溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
小編給大家分享一下Top50ggplot2Visualizations如何實現(xiàn)面積圖，相信大部分人都還不怎么了解，因此分享這篇文章給大家參考一下，希望大家閱讀完這篇文章后大有收獲，下面讓我們一起去了解一下吧！
公眾號里有朋友提問——在散點圖添加擬合曲線的圖中如何添加一條虛線對角線？
就是由圖A變成圖B；應該有很多方法可以實現(xiàn)，這里我使用geom_segment()函數(shù)geom_segment()函數(shù)需要四個參數(shù)：起點位置坐標和終點位置坐標，默認是實線；通過linetype參數(shù)修改線型。
上面圖片的實現(xiàn)代碼
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()函數(shù)來實現(xiàn)。
完整代碼
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如何實現(xiàn)面積圖”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對大家有所幫助，如果還想學習更多知識，歡迎關注億速云行業(yè)資訊頻道！
免責聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點不代表本網(wǎng)站立場，如果涉及侵權請聯(lián)系站長郵箱：is@yisu.com進行舉報，并提供相關證據(jù)，一經(jīng)查實，將立刻刪除涉嫌侵權內(nèi)容。
