R语言数据可视化绘图Slope chart坡度图画法
<div id="navCategory"><h5 class="catalogue">目录</h5><ul class="first_class_ul"><li>Step1. 绘图数据的准备</li><li>Step2. 绘图数据的读取</li><li>Step3. 绘图所需package的安装、调用</li><li>Step4. 绘图</li></ul></div><p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021708553914.jpg" /></p><p>今天小仙给大家分享一下Slope chart(坡度图)的画法，我在paper中看到的图是这样的</p>
<p style="text-align:center"><img alt="Figure from the paper.png" src="https://img.jbzj.com/file_images/article/202202/2022021708553915.png" /></p>
<p>这个图的意思大概是Nasal Tissue比Brochial Tissue的ACE2表达量高(ACE2就是新冠病毒的受体啦) 。为了复刻这张图，小仙捏造了一组差不多的数据，竟然感觉比原图好看！</p>
<p>废话不多说，进入正题。</p>
<p class="maodian"></p><h2>Step1. 绘图数据的准备</h2>
<p>首先要把你想要绘图的数据调整成R语言可以识别的格式，建议大家在excel中保存成csv格式。<br />作图数据格式如下：</p>
<p style="text-align:center"><img alt="绘图数据格式" src="https://img.jbzj.com/file_images/article/202202/2022021708553916.png" /></p>
<p class="maodian"></p><h2>Step2. 绘图数据的读取</h2>
<div class="jb51code"><pre class="brush:ruby;">data<-read.csv(“your file path”, header = T, check.names=F)
#注释：header=T表示数据中的第一行是列名，如果没有列名就用header=F
#注释：R读取数据的时候，默认会把列名里的空格变成 "."，check.names=F就不会变了
</pre></div>
<p class="maodian"></p><h2>Step3. 绘图所需package的安装、调用</h2>
<div class="jb51code"><pre class="brush:ruby;">library(ggplot2)
library(reshape2)
# 注释：package使用之前需要调用
</pre></div>
<p class="maodian"></p><h2>Step4. 绘图</h2>
<div class="jb51code"><pre class="brush:ruby;">data_melt<-melt(data,id.vars = "Sample")
# 注释：将原始的宽数据变成长数据，方便画图
p<-ggplot(data_melt,aes(x=variable,y=value,group=Sample))+
geom_line(color="gray", size=1)+
geom_point(aes(fill=Sample),shape=21, size=3)+
theme_bw()+labs(x="",y="Relative expression")
p
</pre></div>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021708553917.png" /></p>
<p style="text-align:center"><img alt="point的shape类型" src="https://img.jbzj.com/file_images/article/202202/2022021708554018.png" /></p>
<p>直接画出来的图就是下面这样子的，线段和圆圈都是锯齿状的，对图片质量要求比较高、想让直线变平滑的朋友，可以参考我之前的分享《R语言作图技巧——导出高清图》。</p>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021708554019.png" /></p>
<p>如果把geom_point()语句跟geom_point()语句颠倒一下会发生什么呢？</p>
<div class="jb51code"><pre class="brush:ruby;">p<-ggplot(data_melt,aes(x=variable,y=value,group=Sample))+
geom_point(aes(fill=Sample),shape=21, size=3)+
geom_line(color="gray", size=1)+
theme_bw()+labs(x="",y="Relative expression")
p
</pre></div>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021708554020.png" /></p>
<p>语句颠倒，连线就会覆盖点的一部分，如果你想让哪个形状放在最上层，就把相应的画图语句放在后面就可以啦。</p>
<p>以上就是R语言数据可视化绘图Slope chart坡度图画法的详细内容，更多关于R语言数据可视化绘图坡度图的资料请关注琼殿技术社区其它相关文章！</p>
<div class="art_xg">
<b>您可能感兴趣的文章:</b><ul><li>R语言两组变量特征相关关系热图绘制画法</li><li>R语言数据可视化绘图bar chart条形图实现示例</li><li>R语言绘图数据可视化pie chart饼图</li><li>R语言数据可视化绘图Dot plot点图画法示例</li><li>R语言绘图数据可视化Ridgeline plot山脊图画法</li><li>R语言绘图时输出希腊字符上下标及数学公式实现方法</li><li>R语言绘制corrplot相关热图分析美化示例及详细图解</li></ul>
</div>
</div>
<!--endmain-->
頁:
[1]