怎么用R语言ggplot2散点图并添加拟合曲线和置信区间

怎么用R语言ggplot2散点图并添加拟合曲线和置信区间，相信很多没有经验的人对此束手无策，为此本文总结了问题出现的原因和解决方法，通过这篇文章希望你能解决这个问题。

目前创新互联已为上千余家的企业提供了网站建设、域名、虚拟主机、成都网站托管、企业网站设计、临泉网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。

今天的内容是补充材料Fig4中的小a中的第三个小图

数据准备好是如下格式怎么用R语言ggplot2散点图并添加拟合曲线和置信区间

需要示例数据可以直接在文末留言

第一步读入数据

mydf<-read.csv("Single_Cell/covid_metadata_c.csv",header=T,row.names = 1)
dim(mydf)
mydf

这里作图用到的是ggscatter()函数，这个函数来自ggpubr这个包。

最基本的散点图

library(ggpubr)
ggscatter(mydf,x="DPS",y="ISG")

这里需要注意的是想x，y后面跟着的值需要加双引号怎么用R语言ggplot2散点图并添加拟合曲线和置信区间

添加拟合曲线

p1<-ggscatter(mydf,x="DPS",y="ISG",
          add = "reg.line")

添加置信区间

p2<-ggscatter(mydf,x="DPS",y="ISG",
          add = "reg.line",
          conf.int = T)

更改坐标轴标签

p3<-ggscatter(mydf,x="DPS",y="ISG",
              add = "reg.line",
              conf.int = T)+
  labs(y = "Mean ISG module score", 
       x = "Days post-symptom onset")

添加相关系数和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"))

最终的结果如下

分享文章：怎么用R语言ggplot2散点图并添加拟合曲线和置信区间
文章源于：https://www.cdcxhl.com/article38/giopsp.html

成都网站建设公司_创新互联，为您提供营销型网站建设、网站制作、网页设计公司、品牌网站建设、网站内链、外贸建站

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：创新互联

猜你还喜欢下面的内容