set.seed(123) portpirie <- runif(30, 3.6, 4.6) fremantle <- runif(30, 1.2, 1.8) # Realizar una prueba t de dos muestras # Realizar una prueba t de dos muestras t.test(portpirie, fremantle) test_or(test_output_contains("t.test(portpirie, fremantle)"), test_output_contains("t.test(fremantle, portpirie)"))