set.seed(123) portpirie <- runif(30, 3.6, 4.6) fremantle <- runif(30, 1.2, 1.8) # Construya un intervalo de confianza del 95% usando t.test () # Construya un intervalo de confianza del 95% usando 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"))