三行R代码搞定山脊图绘图

推送到百度

有时候我们对比几组数据的分布情形,需要把几组数据的分布叠加在一起,这就用到山脊图了。

今天带来一个最简单的山脊图绘图教程。所需要的数据是这样:

原始数据

非常简单,一列是数据,一列是年份。然后我们导入包ggridges和ggplot2,并读取数据:

library("ggplot2")
library("ggridges")
df <- read.csv('G:/test1.csv')

然后使用ggplot和geom_density_ridges这两个函数来绘图:

df %>%
  ggplot(aes(x = Score, y = year,group=year)) + 
  geom_density_ridges()

效果如下:

这里的数据,其实是2006年到2019年,这里的刻度是默认的形式,已经很美观,如果想自定义,可以这样做:

dd<-df %>%
  ggplot(aes(x = Score, y = year,group=year)) + 
  geom_density_ridges()
dd
dd + scale_x_continuous(name="Score", limits  = c(0,0.6)) +
  scale_y_continuous(name="year", breaks =c(2006, 2010,2015,2019))

这里的limits是对刻度的范围进行限制,breaks这个数组里,可以写入自定义的数组。这段代码执行完就是下面这样:

是不是很简单呢?

网址:http://www.gongju128.cn/?p=352有时候我们对比几组数据的分布情形,需要把几组数据的分布叠加在一起,这就用到山脊图了。 今天带来一个最简单的山脊图绘图教程。所需要的数据是这样: 原始数据 非常简单,一列是数据,一列是年份。然后我们导入icon-default.png?t=N0U7http://www.gongju128.cn/?p=352

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值