91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

Top50ggplot2Visualizations如何實現面積圖

發布時間:2021-11-18 10:15:30 來源:億速云 閱讀:207 作者:小新 欄目:大數據

小編給大家分享一下Top50ggplot2Visualizations如何實現面積圖,相信大部分人都還不怎么了解,因此分享這篇文章給大家參考一下,希望大家閱讀完這篇文章后大有收獲,下面讓我們一起去了解一下吧!

 第一部分

公眾號里有朋友提問——在散點圖添加擬合曲線的圖中如何添加一條虛線對角線?

Top50ggplot2Visualizations如何實現面積圖  
image.png

就是由圖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如何實現面積圖  
image.png

以上是“Top50ggplot2Visualizations如何實現面積圖”這篇文章的所有內容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內容對大家有所幫助,如果還想學習更多知識,歡迎關注億速云行業資訊頻道!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

浦江县| 浮山县| 墨脱县| 深圳市| 丹阳市| 寻甸| 连江县| 丽水市| 稻城县| 金湖县| 新龙县| 迁西县| 汝南县| 涿州市| 洞头县| 安岳县| 楚雄市| 静乐县| 泰和县| 来宾市| 永靖县| 南雄市| 宾阳县| 田阳县| 虹口区| 永新县| 武威市| 巨野县| 天台县| 玉屏| 商河县| 江城| 邹城市| 栾川县| 麻栗坡县| 桂林市| 大同市| 宜川县| 峡江县| 江口县| 肃宁县|