Buenas noches, las sentencias de repeticion me han generado muchos
problemas, en este caso, la idea es almacenar como  filas de un data.frame
los resultados de las funciones Lim.inf  y Lim.sup, les agradezco su ayuda,
el codigo que quiero correr es el siguiente, y lo hace bastante bien, pero
no puedo ni visualizar y mucho menos trabajar sobre los resultados de estas
dos funciones.


Mi <- 134
sigma <- 37.841
n <- 30
sims <- 100
cont <- rep(0, sims)
alfa <- 0.05
for(i in 1:sims) {
x <- rnorm(n, Mi, sigma)
Lim.inf <- (mean(x) - (qt(1-alfa  / 2, n-1) * (sd(x) / sqrt(n))))
Lim.sup <- (mean(x) + (qt(1-alfa  / 2, n-1) * (sd(x) / sqrt(n))))
if(Lim.inf < Mi && Mi < Lim.sup)
{cont[i] <- 1}
}
sum(cont) / sims


-- 

ALEXANDER BERNAL MUŃOZ
U SANTO TOMAS - ESTADÍSTICA - BOGOTÁ

	[[alternative HTML version deleted]]

