二分类变量 Meta 分析

作者

[编辑] 郑虎;

[审核] .

注记

Hiplot 网站

本页面为 Hiplot Meta-analysis of Binary Data 插件的源码版本教程，您也可以使用 Hiplot 网站实现无代码绘图，更多信息请查看以下链接:

https://hiplot.cn/basic/meta-bin?lang=zh_cn

环境配置

系统: Cross-platform (Linux/MacOS/Windows)
编程语言: R
依赖包: data.table; jsonlite; meta; ggplotify

# 安装包
if (!requireNamespace("data.table", quietly = TRUE)) {
  install.packages("data.table")
}
if (!requireNamespace("jsonlite", quietly = TRUE)) {
  install.packages("jsonlite")
}
if (!requireNamespace("meta", quietly = TRUE)) {
  install.packages("meta")
}
if (!requireNamespace("ggplotify", quietly = TRUE)) {
  install.packages("ggplotify")
}

# 加载包
library(data.table)
library(jsonlite)
library(meta)
library(ggplotify)

数据准备

# 加载数据
data <- data.table::fread(jsonlite::read_json("https://hiplot.cn/ui/basic/meta-bin/data.json")$exampleData$textarea[[1]])
data <- as.data.frame(data)

# 整理数据格式
m1 <- metabin(ev.exp, n.exp, ev.cont, n.cont, studlab = Study, data = data)

# 查看数据
head(data)

       Study ev.exp n.exp ev.cont n.cont
1   Fletcher      1    12       4     11
2      Dewar      4    21       7     21
3 Lippschutz      6    43       7     41
4 European_1     20    83      15     84
5 European_2     69   373      94    357

可视化

# 二分类变量 Meta 分析
p <- as.ggplot(function(){
  meta::forest(m1, layout = "meta")
  })

p