R语言实现多变量孟德尔随机化分析(1)

多变量孟德尔随机化分析调整了潜在混杂因素的影响。

1、调整哪些因素?参考以往文献。可以分别调整,也可以一起调整。

2、解决了什么问题?某个暴露相关的SNP,往往与某个或者某几个混杂因素相关。可以控制混杂偏倚。

3、如何解释结果?若该暴露的P值小于0.05,则可以说明该暴露独立于其他暴露对结局产生影响。否则是通过其他因素对结局产生影响。

复制代码
#多变量孟德尔随机化(MVMR)
library(TwoSampleMR)
#提取多个暴露变量工具
#body mass index:ieu-b-40;
#hypertension:ebi-a-GCST90038604
#creatinine:ebi-a-GCST90025946
exposure_dat_mv<-mv_extract_exposures(c("ieu-b-40",
                                        "ebi-a-GCST90038604",
                                        "ebi-a-GCST90025946")) #Serum creatinine levels、Smoking initiation

#提取结局信息
outcome_dat_mv<-extract_outcome_data(exposure_dat_mv$SNP,"ebi-a-GCST90013862") #colorectal cancer

#整合数据
mvdat<-mv_harmonise_data(exposure_dat_mv,
                         outcome_dat_mv,
                         harmonise_strictness = 2)

#进行MVMR的分析
res <- mv_multiple(mvdat)

#提取结果
result<-res$result
#install package
# remotes::install_github("WSpiller/RMVMR",
#                         build_opts=c("--no-resave-data", "--no-manual"),
#                         build_vignettes = TRUE)
library(MVMR)
help(package="MVMR")
wer <- format_mvmr(BXGs = mvdat[["exposure_beta"]],
                      BYG = mvdat[["outcome_beta"]],
                      seBXGs = mvdat[["exposure_se"]],
                      seBYG = mvdat[["outcome_se"]],
                      RSID = rownames(mvdat[["exposure_beta"]]))
#IVW多变量孟德尔随机化结果
ivw_mvmr(wer)
#计算F值
Fz<- strength_mvmr(r_input = wer, gencov = 0)
#异质性检验
pres <- pleiotropy_mvmr(r_input = wer, gencov = 0)
相关推荐
青铜弟弟12 小时前
R语言利用Export包导出pptx格式的文件有错误的原因
开发语言·r语言
维维180-3121-145513 小时前
R语言空间数据分析实战:机器学习预测、尺度转换与地统计建模
r语言·生态·环境·气象·气候·水文·地质
生信小窝16 小时前
068B-基于R语言平台Biomod2集成模型的物种分布模型构建和数据可视化教程【2027】
开发语言·信息可视化·r语言
czliutz2 天前
R绘制股票日波动线图 中国海油600938
开发语言·r语言·r语言绘图
Biomamba生信基地4 天前
R语言绘图神器| ggplot2与其基本用法介绍
开发语言·信息可视化·r语言·生信·医药
天桥下的卖艺者4 天前
R语言基于shiny开发随机森林预测模型交互式 Web 应用程序(应用程序)
前端·随机森林·r语言·shiny
小火柴1234 天前
利用R语言绘制直方图
开发语言·r语言
zhangfeng11335 天前
R语言 读取tsv的三种方法 ,带有注释的tsv文件
开发语言·r语言·生物信息
Tiger Z5 天前
《R for Data Science (2e)》免费中文翻译 (第9章) --- Layers(2)
r语言·数据科学·中文翻译