Selection Models

# Install dmetar:
if (!require("remotes")) {
  install.packages("remotes")
}; remotes::install_github("MathiasHarrer/dmetar")

# Install metasens
install.packages("metasens")

# Load all required packages
library(dmetar)
library(meta)
library(metasens)

# Load 'ThirdWave' data set
data("ThirdWave")

# Run REM meta-analysis
rem <- metagen(TE, seTE, Author, ThirdWave)

# Create a funnel plot
funnel(rem)

# Run Egger's test
eggers.test(rem)

# Run limit meta-analysis
limitmeta(rem)
funnel(limitmeta(rem))

# Run P-curve
pcurve(rem)