set.seed(123)
portpirie <- runif(30, 3.6, 4.6)
fremantle <- runif(30, 1.2, 1.8)
# conduct a two sample t-test
# conduct a two sample t-test
t.test(portpirie, fremantle)
test_or(test_output_contains("t.test(portpirie, fremantle)"), test_output_contains("t.test(fremantle, portpirie)"))