set.seed(123)
portpirie <- runif(30, 3.6, 4.6)
fremantle <- runif(30, 1.2, 1.8)
# construct a 95%-confidence interval using t.test()
# construct a 95%-confidence interval using t.test()
t.test(portpirie, fremantle)$conf.int
test_or(test_output_contains("t.test(portpirie, fremantle)$conf.int"), test_output_contains("t.test(fremantle, portpirie)$conf.int"))