R语言绘制Radar chart雷达图

兰花古剑 發表於 2022-2-17 14:59:15

<div id="navCategory"><h5 class="catalogue">目录</h5><ul class="first_class_ul"><li>更新前原文</li><ul class="second_class_ul"><li>作图方法：</li><ul class="third_class_ul"><li>Step1. 绘图数据的准备</li><li>Step2. 绘图数据的读取</li><li>Step3.绘图所需package的安装、调用</li><li>Step4.绘图数据格式调整</li><li>Step5.绘图</li></ul><li>填充透明度调整方法如下：</li><ul class="third_class_ul"><li>1.取消编组</li><li>2.选中线条，对象—实时上色—建立</li><li>3.选中线条，对象—拓展</li><li>4.更改填充颜色，输入相应颜色RGB数值</li><li>5.删掉图形白色背景</li><li>6.外观—填色—不透明度—调整数值</li></ul></ul></ul></div><p>对于导出带有透明度的高清图，小仙又发现了更懒的办法，特来更新</p>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021714435669.png" /></p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435670.png" /></p>
<p>再Rstudio里调整好透明度之后，直接导出pdf，然后用Adobe illustrator打开pdf文件，直接导出png或jpeg就可以啦</p>
<p class="maodian"></p><h2>更新前原文</h2>
<p>今天小仙同学给大家分享下Radar chart的作图方法，其实雷达图我们在生活中能经常可以见到，比如大家很喜欢玩的王者荣耀里就有。通过简单的图形对比，人物特点一目了然。</p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435671.jpg" /></p>
<p>也经常用来评估学生的成绩和产品的性能。</p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435672.jpg" /></p>
<p>在生信领域，我们也可以用来比较评估样品的基因表达情况啦。</p>
<p>作图数据如下：</p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435673.jpg" /></p>
<p>画出来的效果图如下：</p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435774.jpg" /></p>
<p class="maodian"></p><h3>作图方法：</h3>
<p class="maodian"></p><h4>Step1. 绘图数据的准备</h4>
<p>首先还是要把你想要绘图的数据调整成R语言可以识别的格式excel中保存成csv格式。数据的格式就在上面啦。</p>
<p class="maodian"></p><h4>Step2. 绘图数据的读取</h4>
<div class="jb51code"><pre class="brush:ruby;">data<-read.csv(“your file path”, header = T)
</pre></div>
<p class="maodian"></p><h4>Step3.绘图所需package的安装、调用</h4>
<div class="jb51code"><pre class="brush:ruby;">install.packages("fmsb")
library(fmsb)
</pre></div>
<p class="maodian"></p><h4>Step4.绘图数据格式调整</h4>
<blockquote><p>radarfig<-rbind(rep(15,10),rep(0,10),data)</p></blockquote>
<p>#在原有的数据上增加了两行，<br />#第一、二行分别是每个纵轴的最大值、最小值，也可手动添加</p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435775.jpg" /></p>
<p class="maodian"></p><h4>Step5.绘图</h4>
<div class="jb51code"><pre class="brush:ruby;">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）
</pre></div>
<p>如果从RStudio直接导出png或者jpeg格式的图片，还是会有之前小仙同学提过的**“锯齿状”线条**。之前的解决方案是导出eps格式，在Adobe Illustrator里打开再导出成需要的格式。但本小仙发现一个“巨坑”，就是RStudio导出的eps图形没有透明度，需要在AI里手动调整透明图。<br />（其实R代码的这一部分本小仙很快就写好了，调整填充透明度费了老大劲，实名diss此bug）</p>
<p class="maodian"></p><h3>填充透明度调整方法如下：</h3>
<p class="maodian"></p><h4>1.取消编组</h4>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435776.jpg" /></p>
<p class="maodian"></p><h4>2.选中线条，对象—实时上色—建立</h4>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435777.jpg" /></p>
<p class="maodian"></p><h4>3.选中线条，对象—拓展</h4>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435778.jpg" /></p>
<p class="maodian"></p><h4>4.更改填充颜色，输入相应颜色RGB数值</h4>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435779.jpg" /></p>
<p class="maodian"></p><h4>5.删掉图形白色背景</h4>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435780.jpg" /></p>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435781.jpg" /></p>
<p class="maodian"></p><h4>6.外观—填色—不透明度—调整数值</h4>
<p style="text-align:center"><img alt="在这里插入图片描述" src="https://img.jbzj.com/file_images/article/202202/2022021714435782.jpg" /></p>
<p>(⊙o⊙)，小仙同学也觉得这种方法有点麻烦，不过目前没有找到更好的方法啦<br />（据说excel也可以画雷达图，嫌麻烦的同学可以移步excel啦，能又快又好画出图就是好方法）<br />今天的分享就到这里啦，更多关于R语言绘制Radar chart的资料请关注琼殿技术社区其它相关文章！</p>

                        <div class="art_xg">
                           <b>您可能感兴趣的文章:</b><ul><li>R语言绘制小提琴图violin plot实现示例</li><li>R语言数可视化Split violin plot小提琴图绘制方法</li><li>R语言绘制数据可视化小提琴图Violin plot with dot画法</li><li>R语言两组变量特征相关关系热图绘制画法</li><li>R语言数据可视化绘图Lollipop chart棒棒糖图</li><li>R语言绘制Facet violin plot小提琴刻面图实现示例</li></ul>
                        </div>

                     </div>

頁: [1]

琼殿技术论坛's Archiver

R语言绘制Radar chart雷达图