我是靠谱客的博主 开朗电源,最近开发中收集的这篇文章主要介绍R语言作图基础,觉得挺不错的,现在分享给大家,希望可以做个参考。

概述

R语言作图基础
1.简单的Plot画图
plot()画图
1.直接x,y 二维
plot(x,y)
2.图形化的参数

  1. type 如何画出给定坐标(type=“1”,表示只有线,type=“b”,表示点和线都有,type=“p”,表示只有点,type=“o”,表示用线覆盖点。type=“n”,表示无点也无线)
  2. main ,xlab 和ylab 分别表示图形标题,X轴,Y轴的标签
  3. col 设置点和线所使用的颜色
  4. pch 表示画单独点的特征
  5. cex 表示特征扩展,可以控制点的大小
  6. lty 代表线型
  7. lwd 代表线宽
  8. xlim 和ylim 限制水平区域和垂直区域的范围
  9. main 和xlab ylab 参数如下
plot(resdata$log2FoldChange,-log10(resdata$pvalue),main="Different expression gene Cluster2 Vs Cluster1",xlab="Log2FC",ylab="-Log10(Pvaule)")
###图1
###在main 中加入n 将换行
plot(resdata$log2FoldChange,-log10(resdata$pvalue),main="Different expression gene nCluster2 Vs Cluster1",xlab="Log2FC",ylab="-Log10(Pvaule)")
图2

图1在这里插入图片描述

图2
在这里插入图片描述
col 参数

plot(resdata$log2FoldChange,-log10(resdata$pvalue),main="Different expression gene nCluster2 Vs Cluster1",xlab="Log2FC",ylab="-Log10(Pvaule)",col="seagreen4")

在这里插入图片描述
添加lty 和cex 以及pch(点的形状)后的图

plot(resdata$log2FoldChange,-log10(resdata$pvalue),main="Different expression gene nCluster2 Vs Cluster1",xlab="Log2FC",
ylab="-Log10(Pvaule)",col="seagreen4",pch=16,lty=1,cex=0.7,ylim=c(0,60))

在这里插入图片描述

在已有的图形中添加点和线还有文本

  1. points 添加点
  2. lines 添加线
  3. text 添加文本
  4. arrows添加箭头
  5. legend 添加图列

十步作图

x=1:20
y=c(-1.49,3.37,2.59,-2.78,-3.94,-0.92,6.34,8.51,3.41,-8.23,-12.01,-6.58,2.87,14.12,9.36,-4.58,-14.78,11.67,1.17,15.62)
R=plot(x,y,type="n",main="")###不加点,没有主题
R=abline(h=c(-5,5),col="red",lty=2,lwd=2)##添加2条水平的虚线(如果是垂直的话是v,坐标轴为-1.5和1.5
R=segments(x0=c(5,15),y0=c(-5,-5),x1=c(5,15),y1=c(5,5),col="red",lty=3,lwd=2)###添加2条垂直的线段,直线1由2点确定(5,-5)和(5,5)第2条线(15,-5)和(15,5)
R=points(x[y<=-5],y[y<=-5],pch=3,col="darkgreen",cex=2)###画出y<5的点
R=points(x[(x>5&x<=15)&(y<5&y>-5)],y[(x>5&x<=15)&(y<5&y>-5)],pch=19,col="blue")###画出y在(-5,5)之间,x在(5,15)之间的点
R=points(x[(x<5|x>15)&(y<5&y>-5)],y[(x<5|x>15)&(y<5&y>-5)])##画出x在5和15之外,y在(-5,5)之间的点
R=lines(x,y,lty=14)###用lines画出x和y之间的线,线形选择4,虚线
R=arrows(x0=8,y0=14,x1=11,y1=2.5)###标出箭头的位置(箭头的坐标)
R=text(x=8,y=15,labels="sweet spot")##用labels来给箭头加一个名字"sweet spot",添加的位置是(8,15)这个点
legend("bottomleft",
legend=c("overall process","sweet","standard","too big","too small","sweet y range","sweet x range"),
pch=c(NA,19,1,4,3,NA,NA),
lty=c(4,NA,NA,NA,NA,2,3),
col=c("black","blue","black","darkmagenta","darkgreen","red","red"),
lwd=c(1,NA,NA,NA,NA,2,2),
pt.cex=c(NA,1,1,2,2,NA,NA))

在这里插入图片描述
在这里插入图片描述

x=GBM_Cluster_Deg$log2FoldChange
y=-log10(GBM_Cluster_Deg$pvalue)
head(GBM_Cluster_Deg)
R=plot(x,y,type="n",main="",xlab="Log2FC",ylab="-Log10(Pvaule)")
R=abline(v=c(-1.5,1.5),col="red",lwd=2,lty=2)
R=abline(h=c(10),col="black",lwd=2,lty=2)
R=points(x[x<=-1.5&y>10],y[x<=-1.5&y>10],col="darkgreen",pch=1,lty=1,cex=1.2)
R=points(x[x>=1.5&y>10],y[x>=1.5&y>10],col=6,pch=1,lty=1,cex=1.2)
R=points(x[(x<1.5&x>-1.5)],y[(x<1.5&x>-1.5)],col=1,pch=1,lty=1,cex=0.7)
R=points(x[(x<-1.5|x>1.5)&y<10],y[(x<-1.5|x>1.5)&y<10],col=1,pch=3,lty=1,cex=0.7)
R=text(x=c(4.8,3.4),y=c(43,41.5),labels=c("CCL18","CCL20"),col="red")
legend("topleft",
legend=c("GBM Different expression genes","downregulate","upregulate"),
pch=c(NA,1,1),
col=c("black","blue","red"),
lwd=c(1,2,2),
pt.cex=c(3,1,1))

在这里插入图片描述

数据在这里插入图片描述
对于type的类型
在这里插入图片描述
对于pch 通常的选项
在这里插入图片描述

对于lty 的类型
在这里插入图片描述

最后

以上就是开朗电源为你收集整理的R语言作图基础的全部内容,希望文章能够帮你解决R语言作图基础所遇到的程序开发问题。

如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。

本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
点赞(74)

评论列表共有 0 条评论

立即
投稿
返回
顶部