R语言作图——Radar chart
分享下Radar chart的作图方法,其实雷达图我们在生活中能经常可以见到,比如大家很喜欢玩的王者荣耀里就有。通过简单的图形对比,人物特点一目了然。

也经常用来评估学生的成绩和产品的性能。

在生信领域,我们也可以用来比较评估样品的基因表达情况啦。
作图数据如下:

画出来的效果图如下:

作图方法:
<font size=4 color=red>Step1. 绘图数据的准备</font>
首先还是要把你想要绘图的数据调整成R语言可以识别的格式excel中保存成csv格式。数据的格式就在上面啦。
<font size=4 color=red>Step2. 绘图数据的读取</font>
data<-read.csv(“your file path”, header = T)
<font size=4 color=red>Step3.绘图所需package的安装、调用</font>
install.packages("fmsb")
library(fmsb)
注:如果用恒诺新知的分析平台,则不再需要安装分析包,因为安装过程各种问题,我们的大神已经全部帮大家安装好。
<font size=4 color=red>Step4.绘图数据格式调整</font>
radarfig<-rbind(rep(15,10),rep(0,10),data)
在原有的数据上增加了两行,
第一、二行分别是每个纵轴的最大值、最小值,也可手动添加

<font size=4 color=red>Step5.绘图</font>
radarchart(radarfig, axistype=1,
pcol=rgb(69/255,137/255,137/255) , pfcol=rgb(69/255,137/255,137/255,0.6),
plwd=4 ,seg=5,
cglcol="grey", cglty=1, cglwd=2,axislabcol="black" ,caxislabels=seq(0,15,3),
vlcex=0.7,calcex=0.7)
如果从RStudio直接导出png或者jpeg格式的图片,还是会有之前小仙同学提过的“锯齿状”线条。之前的解决方案是导出eps格式,在Adobe Illustrator里打开再导出成需要的格式。但本小仙发现一个“巨坑”,就是RStudio导出的eps图形没有透明度,需要在AI里手动调整透明图。
(其实R代码的这一部分本小仙很快就写好了 ,调整填充透明度费了老大劲,实名diss此bug)
填充透明度调整方法如下:
1.取消编组

2.选中线条,对象—实时上色—建立

3.选中线条,对象—拓展

4.更改填充颜色,输入相应颜色RGB数值

5.删掉图形白色背景


6.外观—填色—不透明度—调整数值

请关注“恒诺新知”微信公众号,感谢“R语言“,”数据那些事儿“,”老俊俊的生信笔记“,”冷🈚️思“,“珞珈R”,“生信星球”的支持!