溫馨提示×

溫馨提示×

您好，登錄后才能下訂單哦！

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

怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間

發(fā)布時間：2021-11-22 15:59:56 來源：億速云 閱讀：3292 作者：柒染 欄目：大數(shù)據(jù)

怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間，相信很多沒有經(jīng)驗的人對此束手無策，為此本文總結(jié)了問題出現(xiàn)的原因和解決方法，通過這篇文章希望你能解決這個問題。

今天的內(nèi)容是補充材料Fig4中的小a中的第三個小圖

怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間  
image.png

數(shù)據(jù)準備好是如下格式怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間

需要示例數(shù)據(jù)可以直接在文末留言

 第一步讀入數(shù)據(jù)
mydf<-read.csv("Single_Cell/covid_metadata_c.csv",header=T,row.names = 1)
dim(mydf)
mydf
 

這里作圖用到的是ggscatter()函數(shù)，這個函數(shù)來自ggpubr這個包。

 最基本的散點圖
library(ggpubr)
ggscatter(mydf,x="DPS",y="ISG")
 

這里需要注意的是想x，y后面跟著的值需要加雙引號怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間

 添加擬合曲線
p1<-ggscatter(mydf,x="DPS",y="ISG",
          add = "reg.line")
   添加置信區(qū)間
p2<-ggscatter(mydf,x="DPS",y="ISG",
          add = "reg.line",
          conf.int = T)
   更改坐標(biāo)軸標(biāo)簽
p3<-ggscatter(mydf,x="DPS",y="ISG",
              add = "reg.line",
              conf.int = T)+
  labs(y = "Mean ISG module score", 
       x = "Days post-symptom onset")
   添加相關(guān)系數(shù)和p值
p4<-ggscatter(mydf,x="DPS",y="ISG",
              add = "reg.line",
              conf.int = T)+
  labs(y = "Mean ISG module score", 
       x = "Days post-symptom onset")+
  stat_cor(label.x = 8, label.y = 0.2)
   最后是拼圖
ggarrange(p1,p2,p3,p4,
          ncol = 2,
          nrow = 2,
          labels = c("p1","p2","p3","p4"))
 

最終的結(jié)果如下

怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間看完上述內(nèi)容，你們掌握怎么用R語言ggplot2散點圖并添加擬合曲線和置信區(qū)間的方法了嗎？如果還想學(xué)到更多技能或想了解更多相關(guān)內(nèi)容，歡迎關(guān)注億速云行業(yè)資訊頻道，感謝各位的閱讀！

向AI問一下細節(jié)

免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點不代表本網(wǎng)站立場，如果涉及侵權(quán)請聯(lián)系站長郵箱：is@yisu.com進行舉報，并提供相關(guān)證據(jù)，一經(jīng)查實，將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI
助
手