首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

跟着Science学画图:R语言ggplot2作小提琴图展示NLRs基因的拷贝数(copy number)

) plot3 <- ggplot(violin2, aes(x=V2, y=V1)) + geom_violin() plot3 image.png 在此基础上加一个表示平均值的点 plot3...+ stat_summary(fun=mean, geom="point", shape=23, size=2) image.png 在这个基础上再添加抖动的散点图 plot3 +...轴的标题设置一个主题 plot3 + stat_summary(fun=mean, geom="point", shape=23, size=2)+ geom_jitter(position...labs(x="NLR prediction", y="Copy Number of NLRs") + theme_minimal() image.png 论文中提供的代码到这里就结束了,最终附件的图还是有些许差别的...,接下来增加一些代码使之更像附件的图 更改x轴刻度的文本,并将其设置斜体 plot3 + stat_summary(fun=mean, geom="point", shape=23, size

87650

R语言之可视化②点图

主要内容: 准备数据 基本点图 点图上添加摘要统计信息 添加平均值中位数 带有盒子图小提琴图的点图 添加平均值标准差 按更改点图颜色 更改图例位置 更改图例项目的顺序 具有多个的点图...设置仅显示dose0.5mg2mg两个分组的点图 p + scale_x_discrete(limits=c("0.5", "2")) ?...第三步:点图上添加摘要统计信息,使用函数stat_summary()可用于向点图中添加均值/中值点等。...第六步:添加平均值标准差,使用函数mean_sdl。 mean_sdl计算平均值加上或减去常数乘以标准差。在下面的R代码使用参数mult(mult = 1)指定常量。...第七步:按更改点图颜色,在下面的R代码,点图的填充颜色由剂量水平自动控制: # Use single fill color ggplot(ToothGrowth, aes(x=dose, y=len

2.4K40
您找到你想要的搜索结果了吗?
是的
没有找到

ggplot2的position参数解析

❝本节来回答一个老爷的问题,介绍常见绘图案例几个基本参数的设置问题,主要用在柱状图与箱线图中。下面小编通过两个案例来进行展示,图形仅供展示用过程仅参考,希望各位观众老爷能够喜欢。...3. position_dodge2() 这是position_dodge()的一个扩展,提供了更多的控制,preserve= "single":保持每个单独的柱子的宽度不变,而不是整个。...position_dodge2(width = 0.9, preserve = "single") 示例: 假设你有一个数据集,其中有两个因素变量AB,每个都有两个水平12。...使用position="dodge"或position_dodge(),你会得到四个等宽的柱子(两个A=1两个A=2),它们按B的水平分开。...# 绘制箱线图 stat_summary(fun = mean, geom = "point", col = "#00A08A") + # 绘制均值点 stat_summary(fun = mean

46230

ggplot2|详解八大基本绘图要素

此外, 图形还可能包含数据的统计变换(statistical transformation, 缩写stats), 最后绘制某个特定的坐标系(coordinate system, 缩写coord...2 坐标轴标尺修改(x , y) 本部分主要是对坐标轴做如下改变, 更改坐标轴名称 更改x轴上标数的位置内容 显示对一个轴做统计变换 只展示一个区域内的点 更改刻度标签的位置 实现上面的这些可以使用scale_x...# 增加1颜色变量映射,然后求均值并连线 g + aes(color = factor(vs)) + stat_summary(fun.y = mean, geom = "line") ?...ggplot函数可以设置数据映射,每个图层设置函数(geom_xxxstat_xxx)也都可以设置数据映射,这虽然便利,但也可能产生一些混乱。...ggplot2的图层设置函数对映射的数据类型是有较严格要求的,比如geom_pointgeom_line函数要求x映射的数据类型数值向量,而geom_bar函数要使用因子型数据。

6.8K10

67-R可视化11-用ggrepel更加美观的添加标记(火山图的实现)

参考: Examples • ggrepel (slowkow.com)[1] 前言 上一讲我们提到了66-R可视化10-自由的ggplot添加文本(柱状图加计数)[2] 可是,有的时候,并不是所有的...我先前写过:66-R可视化10-自由的ggplot添加文本(柱状图加计数)[3] 这样有个小箭头,好像也还不错~ p <- ggplot(mtcars, aes(factor(cyl), mpg...)) + stat_summary( fill = "gray90", colour = "black", fun = "mean", geom = "col"...上添加文本(柱状图加计数): 66-R可视化10-自由的ggplot添加文本(柱状图加计数).md [3]66-R可视化10-自由的ggplot添加文本(柱状图加计数): 66-R可视化10-自由的...ggplot添加文本(柱状图加计数).md [4]Examples • ggrepel (slowkow.com): https://ggrepel.slowkow.com/articles/examples.html

3.1K30

散点图及数据分布情况

默认情况下每个方向添加的扰动值数据点精度的40% #也可以通过timeweight进行调整 #使用ChickenWeight数据集,讲述不同饮食对小鸡成长的影响 cw_sp <- ggplot(ChickWeight...() #默认情况下,数据将被切分为30,此时可以通过调整组距binwidth或者调整数据的极差进行调整 #除此之外调整边框以及填充色可以看上去更加清晰明了 # 设定5(每个条形跨五个单位) ggplot...A:箱型图的均值一般是添加小钻石解决,使用stat_summary()函数添加你的钻石8 ggplot(birthwt, aes(x = factor(race), y = bwt)) + geom_boxplot...A:使用geom_dotplot()函数。 这种点图也叫做Wilkinson点图。在这种图中点的分组排列取决于数据。每个点的宽度对应了最大距。...传递一个指定xy带宽的向量到h,这个参数会被传递给实际生成密度估计的函数kde2d().本例,我们将在x,y轴方向上生成一个更小的带宽,以使密度估计对数据的拟合程度更高。

7.9K10

课后笔记:ggplot2优雅的显示WB结果

ggplot2柱状图基本绘制函数常用geom_bar()」 参数介绍: 「datamapping是ggplot的基本参数,数据映射。」...mapping:使用aes函数指定,aesthetic attributes的缩写。但字符串映射使用aes_string。...「position:」 位置调整,有效值是stack、dodgefill,默认值是stack(堆叠),是指两个条形图堆叠摆放,dodge是指两个条形图并行摆放,fill是指按照比例来堆叠条形图,每个条形图的高度都相等...image.png 数据调整及误差线增加 ggplot2可以直接结合stat_summary函数快速进行数据统计->链接 所以stat可以设置summary,将柱状图的高度设置各组的均值并联合stat_summary...p.png 间差异性分析 使用stat_compare_means()函数。

2.4K20

R语言ggplot2折线图(line plot)添加置信区间(CI)展示学术论文作者数量的变化趋势

image.png 作图代码 ibrary(ggplot2) ggplot(df, aes(x=year, y=auth_num, col=journal, fill=journal)) + stat_summary...(fun.data="mean_cl_boot", geom="ribbon", #width=.2, alpha=I(.5)) + stat_summary...image.png 根据上图确实可以看出学术期刊的作者数量确实是有增加的趋势的 这里新学到的知识点是使用stat_summary()函数添加置信区间,之前自己也实现过这个图,但是需要提前算好置信区间和平均值...,比如之前的推文 R语言ggplot2画带有置信区间的折线图分组求均值遇到的一个问题,如果换成 stat_summary() 这个函数以后就方便很多 好了,今天的内容就到这里了 大家如果需要推文的示例数据代码的话可以直接在公众号...、基因学、群体遗传学文献阅读笔记; 3、生物信息学入门学习资料及自己的学习笔记!

7.5K41

R语言绘图之ggplot2

按变量图(facet_等) 真正的绘图命令(stat_,geom_,annotate),这三类就是实现一个函数一个图层的核心函数。...,用竖直线来表示 geom_path 几何路径,由一点按顺序连接 geom_point 点 geom_pointrange 一条垂直线,线的中间有一个点(与Crossbar图箱线图相关,可以用来表示线的范围...) geom_polygon 多边形 geom_quantile 一分位数线(来自分位数回归) geom_rect 二维的长方形 geom_ribbon 彩虹图(连续的x值上表示y的范围,例如Tufte...著名的拿破仑远征图) geom_rug 触须 geom_segment 线段 geom_smooth 平滑的条件均值 geom_step 阶梯图 geom_text 文本 geom_tile 瓦片(即一个个的小长方形或多边形...,需要用到统计变换 annotate:添加注释 #由于设置的文本会覆盖原来的图中对应的位置,可以改变文本的透明度或者颜色例:annotate(geom='text')会向图形添加一个单独的文本对象 annotate

4.2K10

ggplot_Violin Plot & dot plot

它是箱式图密度图的组合,密度图通过旋转放置箱式图侧边,以显示数据的分布形状。小提琴图比箱形图显示更多的信息。...library(tidyverse) # 绘图 # 基本绘图参数设置 p % ggplot(aes(x = dose, y = len)) # 添加小提琴图并添加统计均值标准差...# 多组点图 # 分组信息展示添加颜色 p6 <- p + geom_boxplot(width = 0.5) + geom_dotplot(aes(fill = supp), binaxis...结束语 小提琴图不是很常用,也一些杂志见到过,但是不是很多见,了解一下就可,毕竟数据分布,还要涉及到后续分析的内容,自己后续的分析方案是否配套。...慎用吧 关于ggplot添加图层真是个好东西,这样的点箱式图的组合,以前都是用prisma做。 love&peace

1.4K10

详谈R散点图添加误差线的细节

❞ df %>% ggplot(aes(case_control,logCPM)) ❝使用 df 数据帧创建了一个新的 ggplot 对象,并将 x 轴 y 轴变量分别设置 case_control...❞ geom_jitter(aes(fill=case_control,color=case_control), pch=21, width=0.1, size=2) ❝向图表添加一个抖动散点图。...fill color 美学设置 case_control,这意味着点的填充颜色将基于该列的值。参数 pch 指定点的形状,width 指定点的宽度,size 指定点的大小。...❞ stat_boxplot(geom="errorbar", width=0.1, linetype="solid") ❝使用函数 stat_boxplot 向图表添加了误差条。...❞ stat_summary(geom="crossbar", fun="mean", width=0.2, linetype="solid") ❝向图表添加了一条水平线,以显示每个 case_control

1.5K20

SARS-CoV-2感染的雪貂支气管肺泡灌洗液单细胞转录数据挖掘(1)降维聚类分群

(全部的代码复制粘贴即可运行,欢迎尝试以及批评指正) 现在是雪貂支气管肺泡灌洗液单细胞转录显示SARS-CoV-2感染期间巨噬细胞的顺序变化专辑第一讲:主要是降维聚类分群每个单细胞亚群的生物学命名!...此外,它们的组织解剖学特征:包括上、下呼吸道长度的比例、气道腺体密度末端细支气管结构等,模拟人类呼吸道感染提供了最佳条件。...这里,我们执行的scRNA-seq BAL流体样品,这是用于调查的免疫学变化肺,SARS-CoV-2感染雪貂与阴性控制相比,感染后2天(dpi)(早期SARS-CoV-2感染高峰病毒效价)5 dpi...) library(tidyr) ##GEO:GSE171828直接下载即可 MPcov <- readRDS("Seurat_object_total_cells.Rds") MPcov #An...))+ stat_summary(geom = "bar",fun = "mean", position = position_dodge(0.9))+ stat_summary

37020

R语言ggplot2做簇状柱形图并添加误差线的一个完整示例

本文是回答B站关注者的提问,他的问题如下 原始数据存储一个excel文件里,这个excel文件里有三个子表格,每一个子表格的数据如下: 总的数据格式 现在的需要是做如下的图 接下来就介绍如何利用原始数据到最终的图的...作图 library(ggplot2) ggplot(data=new_df,aes(x=name,y=value,fill=var4))+ stat_summary(geom = "bar",...position = position_dodge(0.9))+ stat_summary(geom = "errorbar", fun.min = ebbottom,...,柱子默认是不贴底的,如果要贴底使用函数scale_y_continuous(expand = expansion(mult = c(0,0.1))) mult对应的两个值一个是控制下面,一个是控制上面...,贴底就设置0 就可以了 还有一个知识点是 expand.grid(x=c(1,2,3),y=c(4,5,6)) 可以生成两两配对的数据

2.4K20

24种R语言新手入门之小提琴图(三)

一、前言 柱状图箱线图的代码能理解了其实发现好多作图都是可以触类旁通的,小提琴图作为科研结果常用展示图也不可或缺,用ggplot或者vioplot。...(limits=c("0.5", "2")) 图片 2.2 添加数值 #添加中位值median,均值改mean p + stat_summary(fun.y=mean, geom="point", shape...=23, size=2, color="red") 图片 #中位数四分位数 p + geom_boxplot(width=0.1) 图片 #均值标准差 p <- ggplot(ToothGrowth...geom="pointrange", color="red") 图片 2.3 添加散点 #带点小提琴图 p + geom_dotplot(binaxis='y', stackdir='center',...violinplot区分开来,部分代码不同,但是效果目的一样。每个图都可以自己换线框、填充颜色透明度等,发文不重复。

1.1K20
领券