原创力文档- 1、本文档共21页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
爱之初体验——网状meta分析必备技
能（二）
点击关注猴哥加盟的：freescience（或搜索freescienceunion）
上一期讲到怎样从网页中获取数据（复下点这里）。这回，我们要谈谈如
何使用R软件的gemtc程序包执行网状Meta
分析。R软件风靡全球，R软件的gemtc程序包通过调用对应的rjags程序
包来执行网状Meta
分析是的流行趋势。同时，还可以为GeMTC软件生成相关的数据文
件。其本质是调用基于MCMC法的软件进行网状Meta分析。
本文简要介绍R软件gemtc程序包调用rjags软件进行网状Meta。
废话少说，代码如下：
#1清除环境变量，设置路径
rm(list=ls())
getwd()
#猴哥是放在F盘的0108gemtc_sm文件夹下，你可以自己新建一个文件夹
setwd(F:\\0108gemtc_sm)
#F:\0108gemtc-master
#如果没有安装gemtc，请执行如下命令，执行时去掉#，并在Rstudio中按
ctrl+enter
#install.packages(gemtc)
#2载入程序包
ibrary(lattice)
library(coda)
library(codetools)
#library(testthat)
library(gemtc)
library(R2OpenBUGS)
library(igraph)
library(meta)
#library(XML)
#igraph(=0.6.4),meta(=2.1),XML(=3.6)
#3导入数据
#3.1导入数据,第1种方法
#导入治疗措施treatments并编号ABCDEF。。。
treatments-read.table(textConnection(
iddescription
Aplacebo
Bbupropion
Ccitalopram
Ddesvenlafaxine
Eduloxetine
Fescitalopram
Gfluoxetine
Hfluvoxamine
Imirtazapine
Jnefazodone
Kparoxetine
Lsertraline
Mtrazodone
Nvelafaxine
),header=TRUE)
#默认有row.name1234.。。
#write.csv(treatments,file=
F:\\0108gemtc_sm\\treatments0001.csv)
#导入数据data，为studytreatmentresponderssampleSize的arm水平数据格
式--单臂长数据格式
data-read.table(textConnection(
studytreatmentresponderssampleSize
1A73152
1B76150
1G83154
2A66124
2B78122
2L66118
3A55121
3B77120
3L79119
4A40161
4D205324
5A39122
5D52125
6A48126
6D142249
7A36121
7D46123
8A61164
8D132315
8E74159
9A54141
9E55141
10A49139
10E64128
11A26122
11E54123
12
文档评论（0）