## pairwise comparison between elements (IDs) in two vectors
t1 <- c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 1, 1, 1, 1, 1, 3, 2, 3)
t2 <- c(2, 3, 4, 4, 5, 5, 8, 8, 8, 8, 10, 7, 9, 9, 9, 10, 6, 6, 3, 4)
nma.networkplot(c1 = t1, c2 = t2, percomparison = TRUE)
## network plot for network Middleton10
data(Middleton10)
attach(Middleton10)
nma.networkplot(c1 = sid, c2 = tid, percomparison = FALSE,
weight = TRUE, graphtitle = "Middleton 2010",
trtname = c("FG", "H", "SG", "M"))
detach(Middleton10)Run the code above in your browser using DataLab