磊叔头光光 發表於 2022-2-17 09:27:30

R语言绘图数据可视化Ridgeline plot山脊图画法

<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 class="second_class_ul"><li>调整透明度</li><li>更改顺序</li><li>更改线条形状</li></ul></ul></div><p>今天给大家介绍一下Ridgeline plot(山脊图)的画法。</p>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160321.png" /></p>
<p>作图数据如下:</p>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160422.png" /></p>
<p class="maodian"></p><h2>Step1. 绘图数据的准备</h2>
<p>首先要把你想要绘图的数据调整成R语言可以识别的格式,建议大家在excel中保存成csv格式。</p>
<p class="maodian"></p><h2>Step2. 绘图数据的读取</h2>
<div class="jb51code"><pre class="brush:ruby;">data&lt;-read.csv(“your file path”, header = T)
#注释:header=T表示数据中的第一行是列名,如果没有列名就用header=F
</pre></div>
<p class="maodian"></p><h2>Step3. 绘图所需package的安装、调用</h2>
<div class="jb51code"><pre class="brush:ruby;">library(reshape2)
library(ggplot2)
library(ggridges)                     
# 注释:package使用之前需要调用
# 今天要用到geom_density_ridges()函数需要调用ggridges包
# 直接用install.packages(ggridges)可以安装
</pre></div>
<p class="maodian"></p><h2>Step4. 绘图</h2>
<div class="jb51code"><pre class="brush:ruby;">ggplot(data_melt, aes(x = value , y = variable , fill = variable)) +
geom_density_ridges() +
theme_ridges() +
theme(legend.position = "none")
</pre></div>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160423.png" /></p>
<p class="maodian"></p><h3>调整透明度</h3>
<div class="jb51code"><pre class="brush:ruby;">ggplot(data_melt, aes(x = value , y = variable , fill = variable)) +
geom_density_ridges(alpha = 0.5) +
theme_ridges() +
theme(legend.position = "none")
</pre></div>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160424.png" /></p>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160425.png" /></p>
<p class="maodian"></p><h3>更改顺序</h3>
<div class="jb51code"><pre class="brush:ruby;">level&lt;-levels(data_melt$variable)
data_melt$variable&lt;-factor(data_melt$variable, levels = rev(level))
ggplot(data_melt, aes(x = value , y = variable , fill = variable)) +
geom_density_ridges(alpha = 0.5) +
theme_ridges() +
theme(legend.position = "none")
</pre></div>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160526.png" /></p>
<p style="text-align:center"><img alt="默认顺序" src="https://img.jbzj.com/file_images/article/202202/2022021709160527.png" /></p>
<p style="text-align:center"><img alt="颠倒之后" src="https://img.jbzj.com/file_images/article/202202/2022021709160528.png" /></p>
<p class="maodian"></p><h3>更改线条形状</h3>
<div class="jb51code"><pre class="brush:ruby;">ggplot(data_melt, aes(x = value , y = variable , fill = variable)) +
geom_density_ridges(alpha = 0.5, stat="binline", bins=20) +
theme_ridges() +
theme(legend.position = "none")
</pre></div>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160529.png" /></p>
<p style="text-align:center"><img alt="" src="https://img.jbzj.com/file_images/article/202202/2022021709160630.png" /></p>
<p>以上就是R语言绘图数据可视化Ridgeline plot山脊图画法的详细内容,更多关于R语言数据可视化Ridgeline plot山脊图画法的资料请关注琼殿技术社区其它相关文章!</p>
                           
                            <div class="art_xg">
                              <b>您可能感兴趣的文章:</b><ul><li>ComplexHeatmap绘制单个热图</li><li>R语言绘制corrplot相关热图分析美化示例及详细图解</li><li>R语言两组变量特征相关关系热图绘制画法</li><li>R语言数据可视化绘图bar&nbsp;chart条形图实现示例</li><li>R语言数据可视化绘图Lollipop chart棒棒糖图</li><li>R语言ComplexHeatmap绘制复杂热图heatmap</li></ul>
                            </div>

                        </div>
                        <!--endmain-->
頁: [1]
查看完整版本: R语言绘图数据可视化Ridgeline plot山脊图画法