data(d.osc15Onesample)
tx <- structure(d.osc15Onesample[,c("effecto","teststatistico","no")],
names=c("effect","teststatistic","n"))
ty <- structure(d.osc15Onesample[,c("effectr","teststatisticr","nr")],
names=c("effect","teststatistic","n"))
replication(tx, ty, rlv.threshold=0.1)
Run the code above in your browser using DataLab