分享

【R绘图】散点图+直方图(密度图)

 生信交流平台 2021-12-29

一般展示两个变量之间的相关性,我们经常会用到散点图。前面我也给大家简单介绍过

☞R计算mRNA和lncRNA之间的相关性+散点图

☞R语言绘图:复杂散点图绘制

相信大家在读paper的时候也见到过下面这种类型的图

这张图在传统的相关性散点图的基础上还多了一个直方图,来展示该变量的分布情况。今天我们就来带大家来重现这样的图。

#安装psych包install.packages("psych")#加载psych包library(psych)#使用psych包自带的数据集sat.act#查看前6行head(sat.act)

首先我们用默认参数来画图看看效果

#绘制SATVSATQ之间的相关性散点图和直方图with(sat.act,scatter.hist(SATV,SATQ))

这个是默认参数画出来的图,问题还是比较多的。

1)横纵坐标没有显示变量名字。

2)散点图上有两个椭圆,还有一条平滑曲线

3)没有拟合直线

4)主标题想修改一下

接下俩我们就来通过调节参数来解决这几个问题

scatter.hist(sat.act[5:6], ab=T, #增加拟合直线 ellipse=F, #删除椭圆 smooth=F, #删除平滑曲线 xlab="SATV", #行坐标名 ylab="SATQ", #纵坐标名 title="SATQ vs SATV" #修改主标题)

接下来我们整点高级的,数据中还包含有性别这一列,我们用不同的颜色来区分两种性别,并展示密度图。

scatter.hist(SATV ~ SATQ + gender, #增加性别这个变量 data=sat.act, title="SATQ vs SATV", #修改主标题 xlab="SATV", #行坐标名 ylab="SATQ", #纵坐标名 ab=T, #增加拟合直线 correl=F, #删除右上角的相关系数 smooth=F, #删除平滑曲线 grid=T, #添加网格线 ellipse=F #删除椭圆 )

今天的分享就先到这里,如果大家觉得有用,别忘了点"在看",分享给更多的小伙伴~

为了方便大家交流学习,共同进步,我特地创建了微信交流群

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多