I am running a network meta-analysis on these data:
study<-c("Jones", "Jones", "Prieto", "Prieto", "Scott"