hola!
podrian ayudarme con esto:
Genere 1000 muestras aleatorias de tamao n=10 de una poblacin
normal con media
=2,5 y desviacin 0,16. Con cada una de las muestras construya un
intervalo de
confianza al 95% para la media y para la varianza. Cuente que
porcentaje de los 1000
intervalos atrapan la verdadera media y la verdadera varianza poblacional
respectivamente. Comente los resultados encontrados.
he hecho esto
promedio=0
varianza=0
for(i in 1:1000)
{
y<-rnorm(10, 2.5, 0.16)
promedio[i]=mean(y)
varianza[i]=var(y)
}
promedio
varianza
#para generar 1000 prom y 1000 varianzas para la muestra de n=10,
mu=2.5 y dev=0.16
intmedia=c(promedio) #intmedia =iintervalo de confianza para la media
t.test(intmedia, conf.level=0.95)
One Sample t-test
data: intmedia
t = 1575.343, df = 999, p-value < 2.2e-16
alternative hypothesis: true mean is not equal to 0
95 percent confidence interval:
2.494522 2.500744
sample estimates:
mean of x
2.497633
# el intervalo de conf para la media seria ( 2.494522 , 2.500744 )
para la varianza seria igual?
como hago para contar los intervalos que atrapan las verderas medias
y las verdaderas varianzas?
soy novata en esto, por favor ayudenme!
El 14/04/11, r-help-es-request en r-project.org
<r-help-es-request en r-project.org> escribi:> Enve los mensajes para la lista R-help-es a
> r-help-es en r-project.org
>
> Para subscribirse o anular su subscripcin a travs de la WEB
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
> O por correo electrnico, enviando un mensaje con el texto "help"
en
> el asunto (subject) o en el cuerpo a:
> r-help-es-request en r-project.org
>
> Puede contactar con el responsable de la lista escribiendo a:
> r-help-es-owner en r-project.org
>
> Si responde a algn contenido de este mensaje, por favor, edite la
> linea del asunto (subject) para que el texto sea mas especifico que:
> "Re: Contents of R-help-es digest...". Adems, por favor, incluya
en
> la respuesta slo aquellas partes del mensaje a las que est
> respondiendo.
>
>
> Asuntos del da:
>
> 1. Re: Numeros en formato Ax10^{-B} (Jorge Ivan Velez)
> 2. Re: Numeros en formato Ax10^{-B} (Carlos Ortega)
> 3. Re: III Jornadas de usuarios de R: 17 y 18 de noviembre en la
> EOI, Madrid (Oscar Perpian Lamigueiro)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Wed, 13 Apr 2011 16:40:40 -0400
> From: Jorge Ivan Velez <jorgeivanvelez en gmail.com>
> To: Olivier Nuez <onunez en iberstat.es>
> Cc: r-help-es en r-project.org
> Subject: Re: [R-es] Numeros en formato Ax10^{-B}
> Message-ID: <BANLkTikjnEWZ_Ohq0unY-p+cSMYPfH4cnA en mail.gmail.com>
> Content-Type: text/plain
>
> Ah ha! Muchas gracias Olivier. Creo que es hora de ir por mas cafe ;-)
>
> Un saludo,
> Jorge
>
>
> 2011/4/13 Olivier Nuez <>
>
>> Igual, lo siguiente te vale:
>>
>> > foo<-function(x) { y=format(x, digits=2,scientific = TRUE);
>> sub("e","x10",y)}
>> > foo(x)
>> [1] "1.7x10-04" "7.6x10-04" "1.3x10-04"
"2.9x10-04" "5.6x10-04"
>> "7.8x10-04" "7.8x10-04" "1.4x10-04"
"3.2x10-04" "8.5x10-05"
>>
>> Un saludo. Olivier
>> -- ____________________________________
>>
>> Olivier G. Nuez
>> Email: onunez en iberstat.es
>> Tel : +34 663 03 69 09
>> Web: http://www.iberstat.es
>>
>> ____________________________________
>>
>>
>>
>>
>> El 13/04/2011, a las 22:23, Jorge Ivan Velez escribi:
>>
>>
>> Hola a todos,
>>>
>>> Tengo un vector con valores en _P_
>>>
>>> x <- c(0.0001709122, 0.0007623474, 0.0001319547, 0.0002868035,
>>> 0.0005602669,
>>> 0.0007825347, 0.0007822033, 0.0001444821, 0.000324731, 8.4686e-05)
>>> x
>>>
>>> Y me gustaria cambiar un poco el formato. Conoce alguien alguna
function
>>> "foo" tal que foo(x) produzca
>>>
>>> "1.7x10(-4)" "7.62x10(-4)"
"1.3x10(-4)" ..... "8.46x10(-5)"
>>>
>>> ?
>>>
>>> Muchas gracias,
>>> Jorge Ivan Velez
>>>
>>
>>
>
> [[alternative HTML version deleted]]
>
>
>
> ------------------------------
>
> Message: 2
> Date: Wed, 13 Apr 2011 23:24:27 +0200
> From: Carlos Ortega <coforfe en gmail.com>
> To: Jorge Ivan Velez <jorgeivanvelez en gmail.com>
> Cc: r-help-es en r-project.org
> Subject: Re: [R-es] Numeros en formato Ax10^{-B}
> Message-ID: <BANLkTin8pPhy2jsXR-A5sKVgBVv4yAsv+w en mail.gmail.com>
> Content-Type: text/plain
>
> Hola,
>
> Por si ayuda tambin...
>
> foo<-function(x) {
> y<-formatC(x,format="e", digits=2)
> z<-as.character(y)
> v<-gsub("e","x10(",z)
> w<-paste(v,")",sep="")
> return(w)
> }
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
>
>
>
> 2011/4/13 Jorge Ivan Velez <jorgeivanvelez en gmail.com>
>
>> Ah ha! Muchas gracias Olivier. Creo que es hora de ir por mas cafe
;-)
>>
>> Un saludo,
>> Jorge
>>
>>
>> 2011/4/13 Olivier Nuez <>
>>
>> > Igual, lo siguiente te vale:
>> >
>> > > foo<-function(x) { y=format(x, digits=2,scientific =
TRUE);
>> > sub("e","x10",y)}
>> > > foo(x)
>> > [1] "1.7x10-04" "7.6x10-04"
"1.3x10-04" "2.9x10-04" "5.6x10-04"
>> > "7.8x10-04" "7.8x10-04" "1.4x10-04"
"3.2x10-04" "8.5x10-05"
>> >
>> > Un saludo. Olivier
>> > -- ____________________________________
>> >
>> > Olivier G. Nuez
>> > Email: onunez en iberstat.es
>> > Tel : +34 663 03 69 09
>> > Web: http://www.iberstat.es
>> >
>> > ____________________________________
>> >
>> >
>> >
>> >
>> > El 13/04/2011, a las 22:23, Jorge Ivan Velez escribi:
>> >
>> >
>> > Hola a todos,
>> >>
>> >> Tengo un vector con valores en _P_
>> >>
>> >> x <- c(0.0001709122, 0.0007623474, 0.0001319547,
0.0002868035,
>> >> 0.0005602669,
>> >> 0.0007825347, 0.0007822033, 0.0001444821, 0.000324731,
8.4686e-05)
>> >> x
>> >>
>> >> Y me gustaria cambiar un poco el formato. Conoce alguien
alguna
>> function
>> >> "foo" tal que foo(x) produzca
>> >>
>> >> "1.7x10(-4)" "7.62x10(-4)"
"1.3x10(-4)" ..... "8.46x10(-5)"
>> >>
>> >> ?
>> >>
>> >> Muchas gracias,
>> >> Jorge Ivan Velez
>> >>
>> >
>> >
>>
>> [[alternative HTML version deleted]]
>>
>>
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es en r-project.org
>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>
>>
>
> [[alternative HTML version deleted]]
>
>
>
> ------------------------------
>
> Message: 3
> Date: Thu, 14 Apr 2011 10:09:24 +0200
> From: Oscar Perpian Lamigueiro <oscar.perpinan en upm.es>
> To: Antonio Maurandi Lpez <amaurandi en um.es>
> Cc: r-help-es en r-project.org
> Subject: Re: [R-es] III Jornadas de usuarios de R: 17 y 18 de
> noviembre en la EOI, Madrid
> Message-ID: <20110414100924.2562a233 en OPL-EUITI>
> Content-Type: text/plain; charset=UTF-8
>
> Hola,
>
> Fijaos que en el programa (http://www.usar.org.es/programa.php) ya
> hemos incluido la cena. Ser el jueves a las 21'30, y por eso la
> jornada del viernes empieza algo ms tarde :-).
>
> Segn vayamos avanzando en la organizacin de esta cena (lugar, precio
> por comensal, etc.) iremos informando de los detalles. No obstante,
> cualquier ayuda ser muy bienvenida.
>
> Saludos.
>
> Oscar.
>
>
> -------------------
> Oscar Perpin Lamigueiro
> Dpto. Ingeniera Elctrica
> EUITI-UPM
>
> http://procomun.wordpress.com
>
> -----------------------------------------
>>yo no lo veo mal, tb es cierto que Madrid es ms barato para todos
>>pues mucha gente no se tendr que desplazar.
>>
>>Lo de la cena comunal lo veo muy bien, pq con una birra o un par de
>>vinos se habla de sw libre mucho mejor (y de estadstica no te digo),
>>adems yo creo que es algo que se echo en falta en las ltimas
>>jornadas.
>>
>>Si la organizacin no puede abordar lo de la cena quizs podemos abrir
>>un proyecto paralelo....
>>
>>
>>
>>
>>El 13/04/11 13:19, Gregorio R. Serrano escribi:
>>> cubrir gastos. Eso s, habra que decirlo cuanto antes en l
>>
>>--
>>Antonio Maurandi Lpez
>>Serv. Clculo Cientfico. Apoyo Estadstico.
>>Servicio de Apoyo a la Investigacin (SAI)
>>Vicerrectorado de Investigacin.
>>Universidad de Murcia
>>
>>Edif. CAID. Campus de Espinardo.
>>30100 Murcia
>>@. amaurandi en um.es
>>T. 868 88 7315 F. 868 88 7302
>>www.um.es/sai www.um.es/ae
>>
>>
>> [[alternative HTML version deleted]]
>>
>
>
>
> ------------------------------
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>
> Fin de Resumen de R-help-es, Vol 26, Envo 25
> *********************************************
>
