R语言作图——Dumbbell plot(哑铃图)

原创：黄小仙

又是一年春来到，小仙祝大家在新的一年开开心心、顺顺利利！
今天给大家分享的图是哑铃图(Dumbbell plot)。

Step1. 绘图数据的准备

首先要把你想要绘图的数据调整成R语言可以识别的格式，建议大家在excel中保存成csv格式。
作图数据格式如下：

Step2. 绘图数据的读取

data <- read.csv(“your file path”, header = T, check.names=F)
#注释：header=T表示数据中的第一行是列名，如果没有列名就用header=F
#注释：R读取数据的时候，默认会把列名里的空格变成 "."，check.names=F就不会变了

Step3. 绘图所需package的安装、调用

library(ggplot2)
library(reshape2)
# 注释：package使用之前需要调用

Step4. 绘图

data_melt <- melt(data,id.vars = "Gene")
# 注释：将原始的宽数据变成长数据，方便画图
p <- ggplot(data_melt,aes(x = value, y = Gene)) +  geom_line(aes(group = Gene)) +geom_point(aes(fill = variable), size = 3)
p

注意改变点颜色的语句fill = variable没有发挥作用，为什么呢？

还是跟geom_point()中的shape有关系，默认是16号实心原点，只有color参数

p <- ggplot(data_melt,aes(x= value, y= Gene)) +  geom_line(aes(group = Gene)) +geom_point(aes(color = variable), size = 3)
p

改变size的大小

p <- ggplot(data_melt,aes(x= value, y= Gene)) +  geom_line(aes(group = Gene)) +geom_point(aes(color = variable, size = value))
p

调整顺序

order <- c("Gene1","Gene2","Gene3","Gene4","Gene5","Gene6","Gene7","Gene8","Gene9","Gene10")
p <- ggplot(data_melt,aes(x= value, y= Gene)) +  geom_line(aes(group = Gene)) +geom_point(aes(fill=variable), shape = 21, size = 3) +scale_y_discrete(limits = order)
p

Gene1放在y轴最上面

order <- rev(order)
p <- ggplot(data_melt,aes(x= value, y= Gene)) +  geom_line(aes(group = Gene)) +geom_point(aes(fill=variable), shape = 21, size = 3) +scale_y_discrete(limits = order)
p

今天的分享就到这里啦。

（公众号：生信了）

R语言作图——Dumbbell plot(哑铃图)相关推荐

R语言作图——violin plot(小提琴图)
原创黄小仙即便小仙同学决定学习R语言来提升自己作图的"逼格"的时候,心中还有有些疑虑的(嘿嘿,我这么懒,可不愿意做无用功了?).仔细想了想,貌似又找到了两个学习R的理由. 一是 ...
R语言作图——Dot plot(点图)
原创:黄小仙 2020开年不凡, 生活果然充满了惊吓,可仍然要期待惊喜呀.今天要给大家介绍的是点图(Dot plot),点图展示的数据比较简单,但胜在好看啊. 作图数据如下: Step1. 绘图数据的 ...
R语言作图——Pie chart(饼图)
原创:黄小仙今天要给大家介绍的Pie chart(饼图),本来是不打算写这个的,因为用Excel画饼图实在是太方便了.本着能少动一下是一下的懒人原则,是不打算用R画的,再说,本小仙不是掌握了R作图大 ...
r语言ggplot画两条曲线_R语言作图——Line plot with error
原创:黄小仙为了画今天的这个图,小仙决定凭空想象一台可以实时监控基因表达水平的设备,成功得到了这么一组数据. 想要画的图是这样子滴. Step1.绘图数据的准备首先要把你想要绘图的数据调整成R语言 ...
R语言ggplot2可视化可视化聚类图、使用geom_encircle函数绘制多边形标定属于同一聚类簇的数据点、并自定义每个聚类簇数据点的颜色、多边形框的颜色（Cluster Plot）、主副标题题注
R语言ggplot2可视化可视化聚类图.使用geom_encircle函数绘制多边形标定属于同一聚类簇的数据点.并自定义每个聚类簇数据点的颜色.多边形框的颜色(Cluster Plot).主副标题题注 ...
R语言ggplot2可视化分面图（faceting）、可视化分面条形图（facet_wrap bar plot）、使用strip.text函数自定义分面图每个分面标题条带strip的大小(cutomi
R语言ggplot2可视化分面图(faceting).可视化分面条形图(facet_wrap bar plot).使用strip.text函数自定义分面图每个分面标题条带strip的大小(cutomi ...
R语言plotly包可视化线图（line plot）、使用restyle参数自定义设置可视化结果中线条的颜色、使用按钮动态切换线条的颜色(change line color with button)
R语言plotly包可视化线图(line plot).使用restyle参数自定义设置可视化结果中线条的颜色.使用按钮动态切换线条的颜色(change line color with button i ...
R语言ggplot2可视化分面图（faceting）、在所有的分面中添加相同的参考基准曲线（overlay a base or reference plot to all facets )
R语言ggplot2可视化分面图(faceting).在所有的分面中添加相同的参考基准曲线(overlay a base or reference plot to all facets in a gg ...
R语言ggplot2可视化绘制线图（line plot）、使用gghighlight包突出高亮满足条件的线图、并保留其它线图的色彩（而不是灰色）自定义非高亮线图的透明度
R语言ggplot2可视化绘制线图(line plot).使用gghighlight包突出高亮满足条件的线图.并保留其它线图的色彩(而不是灰色)自定义非高亮线图的透明度目录
R语言ggplot2可视化分面图（faceting）、编写自定义函数将生成的分面图分裂成多个子图、并按照索引读取对应的可视化图像:Split facet plot into list of plots
R语言ggplot2可视化分面图(faceting.facet_wrap).编写自定义函数将生成的分面图(faceting)分裂成多个子图.并按照索引读取对应的可视化图像(Split facet pl ...

R语言作图——Dumbbell plot(哑铃图)

R语言作图——Dumbbell plot(哑铃图)相关推荐

最新文章

热门文章