library("netmeta")
data(smokingcessation)
p1 <- pairwise(list(treat1, treat2, treat3),
list(event1, event2, event3), list(n1, n2, n3),
data = smokingcessation, sm = "OR")
# Outlier and influential detection measures
measures <- NMAoutlier.measures(p1)
# Mahalanobis distance values for each study in the network
measures$Mah
# Q-Q netplot for the network of smoking cessation dataset
Qnetplot(measures)
Run the code above in your browser using DataLab