d.osc15Onesample {relevance}

Data from the OSC15 replication study, one sample tests

Description

A small subset of the data of the famous replication study of the Open Science Collaboration published in 2015, comprising the one sample and paired sample tests, used for illustration of the determination of succcess of the replications as defined by Stahel (2022)

Usage

data("d.osc15Onesample")

Format

d.osc15:

row.names

identification number of the study

teststatistico, teststatisticr

test statistic, original paper and replication, respectively

no, nr

number of observations, original and replication

effecto, effectr

effect size as defined by OSC15, original and replication

Source

Data repository https://osf.io/jrxtm/

References

Open Science Collaboration (2015). Estimating the reproducibility of psychological science. Science 349, 943-952

See Also

d.osc15

Examples

data(d.osc15Onesample)

plot(effectr~effecto, data=d.osc15Onesample, xlim=c(0,3.5),ylim=c(0,2.5),
     xaxs="i", yaxs="i")
abline(0,1)

## Compare confidence intervals between original paper and replication
to <- structure(d.osc15Onesample[,c("effecto","teststatistico","no")],
      names=c("effect","teststatistic","n"))
tr <- structure(d.osc15Onesample[,c("effectr","teststatisticr","nr")],
      names=c("effect","teststatistic","n"))
( rr <- replication(to, tr, rlv.threshold=0.1) )
plconfint(rr, refline=c(0,0.1))
plconfint(attr(rr, "estimate"), refline=c(0,0.1))