
Estimado Amigo:Soy estudiante de pre-grado y necesito ayuda en crear funciones para generar lo siguiente:Generar una familia de distribuciones chio cuadrado, para ver la aproximación a la normal.Generar una familia de distribuciones F -Snedecor, para ver la aproximación a la normal.En el juego ce Craps se lanzan dos dados. Si el jugador saca 7 u 11 puntos gana. Si saca 2,3 ó 12 pierde.         En los otros casos continua jugando los dados hasta que salga 7, en cuyo caso pierde, o hasta que sale el primer resultado         caso en el cual gana. ¿Cual es la probabilidad de ganar?lo que necesito es saber como puedo hacer la simulaciones para cada uno de estos caso.
Agradezco por anticipado la ayuda
 
Jackson M'coy Romero PlasenciaLic. en Estadística966122565	066311881	



> From: r-help-es-request@r-project.org
> Subject: Resumen de R-help-es, Vol 27, Envío 4
> To: r-help-es@r-project.org
> Date: Tue, 3 May 2011 09:48:15 +0200
> 
> Envíe los mensajes para la lista R-help-es a
> 	r-help-es@r-project.org
> 
> Para subscribirse o anular su subscripción a través de la WEB
> 	https://stat.ethz.ch/mailman/listinfo/r-help-es
> 
> O por correo electrónico, enviando un mensaje con el texto "help" en
> el asunto (subject) o en el cuerpo a:
> 	r-help-es-request@r-project.org
> 
> Puede contactar con el responsable de la lista escribiendo a:
> 	r-help-es-owner@r-project.org
> 
> Si responde a algún 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...". Además, por favor, incluya en
> la respuesta sólo aquellas partes del mensaje a las que está
> respondiendo.
> 
> 
> Asuntos del día:
> 
>    1. Re: Oferta de empleo en Berlin (Usuario R)
>    2. Re: Marginal a partir de la densidad conjunta (Olivier Nuñez)
>    3. Re: Determinar Patron (Olivier Nuñez)
>    4. Re: Marginal a partir de la densidad conjunta (Olivier Nuñez)
>    5. [Fwd: Re:  Patron de curvas biologicas] (José Trujillo Carmona)
> 
> 
> ----------------------------------------------------------------------
> 
> Message: 1
> Date: Mon, 2 May 2011 12:10:51 +0200
> From: Usuario R <r.user.spain@gmail.com>
> To: r-help-es <r-help-es@r-project.org>
> Subject: Re: [R-es] Oferta de empleo en Berlin
> Message-ID: <BANLkTi=aGp9Ork=K+j_ryhmTfRUCBk2=gg@mail.gmail.com>
> Content-Type: text/plain
> 
> Hola,
> 
> Quería añadir que no se requiere hablar Aleman, pero si Inglés.
> 
> Un saludo
> Patricia
> 
> 
> El 2 de mayo de 2011 11:54, Usuario R <r.user.spain@gmail.com> escribió:
> 
> > Hola,
> >
> > Consultoría en la industria de management a nivel internacional, está
> > buscando un programador de R a tiempo completo.  Se requiere ser residente
> > en Alemania. La oferta incluye progrmación básica en R, mantenimiento de un
> > código que está hecho y propuesta de mejoras en el proceso de producción.
> >
> > Si alguien está interesado en tener mas información por favor escribidme.
> > Un saludo
> > --
> > Patricia García González
> >
> >
> >
> 
> 
> -- 
> Patricia García González
> 
> 	[[alternative HTML version deleted]]
> 
> 
> 
> ------------------------------
> 
> Message: 2
> Date: Mon, 2 May 2011 14:21:32 +0200
> From: Olivier Nuñez <onunez@iberstat.es>
> To: R-es CRAN <r-help-es@r-project.org>
> Subject: Re: [R-es] Marginal a partir de la densidad conjunta
> Message-ID: <EF4FD0FF-4814-4252-BB8E-95DCCEDF249F@iberstat.es>
> Content-Type: text/plain; charset=ISO-8859-1; delsp=yes; format=flowed
> 
> Según recuerdo, las copulas están definidas a partir de las marginales.
> Con lo cual, en principio debería disponer de ellas.
> Si por alguna razón no dispones de ellas,
> puedes evaluar las marginales utilizando por ejemplo el método de  
> Importance Sampling.
> Por ultimo, me parece que la densidad que das no es una densidad de  
> probabilidad sobre el intervalo [0, infinity],
> ya que tu función f(x,y) se dispara cuando x e y tienden hacia el  
> infinito.
> Un saludo. Olivier
> -- ____________________________________
> 
> Olivier G. Nuñez
> Email: onunez@iberstat.es
> Tel : +34 663 03 69 09
> Web: http://www.iberstat.es
> 
> ____________________________________
> 
> 
> 
> 
> El 02/05/2011, a las 0:02, Cesar Escalante escribió:
> 
> > Cordial saludo.
> >
> > Estoy trabajando con una densidad conjunta algo elaborada (suma y  
> > cociente
> > de dos variables aleatorias positivas usando la cópula Frank) y  
> > requiero
> > encontrar la distribución marginal de cada una de las variables. A  
> > manera de
> > ejemplo (no es el caso específico, que tiene mucho más código), si  
> > partimos
> > de la distribución exponencial bivariada
> > #-----
> > theta<-0.5
> > f<-function(x,y){exp(x+y+theta*x*y)*((1+theta*x)*(1+theta*y)-theta)} #
> > Densidad conjunta
> > xx<-yy<-seq(0,1,0.02)
> > zz <- outer(xx, yy, f)
> > persp(xx,yy,zz)
> > #------
> > ¿Cómo obtener la densidad marginal de X? Algo como:
> >
> > # fx<-function(x){integral desde 0 hasta Inf de f(x,y)dy}
> >
> > Muchas gracias de antemano por la ayuda.
> >
> > Saludos.
> >
> > César Escalante C.
> >
> > 	[[alternative HTML version deleted]]
> >
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es@r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
> 
> 
> 
> ------------------------------
> 
> Message: 3
> Date: Mon, 2 May 2011 14:31:12 +0200
> From: Olivier Nuñez <onunez@iberstat.es>
> To: Carlos Andres Perez Angarita <caaperezan@gmail.com>
> Cc: r-help-es@r-project.org
> Subject: Re: [R-es] Determinar Patron
> Message-ID: <42D57805-90CA-42E6-B46B-22B8B73687EF@iberstat.es>
> Content-Type: text/plain; charset=ISO-8859-1; delsp=yes; format=flowed
> 
> ¿Qué llamas patrón? ¿Una curva parametrizada?
> Si es así,  creo que te haría falta un modelo biológico que  
> justifique este modelo de curva.
> Si no existe dicho modelo biológico, creo que lo más apropiado, sería  
> utilizar el análisis funcional de datos,
> y el "patrón" podría ser por ejemplo la curva central.
> Para evaluarla echa un viztazo al paquete fda (functional data  
> analysis).
> Un saludo. Olivier
> --  
> ____________________________________
> 
> Olivier G. Nuñez
> Email: onunez@iberstat.es
> Tel : +34 663 03 69 09
> Web: http://www.iberstat.es
> 
> ____________________________________
> 
> 
> 
> 
> El 02/05/2011, a las 1:24, Carlos Andres Perez Angarita escribió:
> 
> > Saludos a todos
> >
> > como analizo las curvas o funciones (ANALISIS DE COMPONENTES  
> > PRINCIPALES O CORRELACION CANONICA) que estan adjuntadas en el  
> > archivo JPEG,  Necesito determinar el patron o una funcion  
> > equivalente, gracias a todos
> >
> > CARLOS  
> > ANDRES<Funciones.JPG>_______________________________________________
> > R-help-es mailing list
> > R-help-es@r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
> 
> 
> 
> ------------------------------
> 
> Message: 4
> Date: Mon, 2 May 2011 14:51:52 +0200
> From: Olivier Nuñez <onunez@iberstat.es>
> To: Cesar Escalante <c.escalante.c@gmail.com>
> Cc: r-help-es@r-project.org
> Subject: Re: [R-es] Marginal a partir de la densidad conjunta
> Message-ID: <A696772D-C091-48F8-A4E1-D3109C79B6FD@iberstat.es>
> Content-Type: text/plain; charset=ISO-8859-1; delsp=yes; format=flowed
> 
> ....
> Lo siguiente debería funcionar para evaluar la marginal.
> Par simplificar, utilicé la exponencial de media 1 como función de  
> importancia
> Sin embargo, una Beta debería ser más apropiada (i.e., dar una  
> aproximación más estable) en el ejemplo que consideras.
> 
> 
> .....
> fx<-function(x){
> 	n=1000 #tamaño de la muestra Monte Carlo
> 	y=rexp(n)
> 	fx=apply(data.frame(x),1,FUN=function(u) mean(f(u,y)*exp(y)))
> 	}
> plot(xx,fx(xx),type="l")	
> 
> --  
> ____________________________________
> 
> Olivier G. Nuñez
> Email: onunez@iberstat.es
> Tel : +34 663 03 69 09
> Web: http://www.iberstat.es
> 
> ____________________________________
> 
> 
> 
> 
> El 02/05/2011, a las 0:02, Cesar Escalante escribió:
> 
> > Cordial saludo.
> >
> > Estoy trabajando con una densidad conjunta algo elaborada (suma y  
> > cociente
> > de dos variables aleatorias positivas usando la cópula Frank) y  
> > requiero
> > encontrar la distribución marginal de cada una de las variables. A  
> > manera de
> > ejemplo (no es el caso específico, que tiene mucho más código), si  
> > partimos
> > de la distribución exponencial bivariada
> > #-----
> > theta<-0.5
> > f<-function(x,y){exp(x+y+theta*x*y)*((1+theta*x)*(1+theta*y)-theta)} #
> > Densidad conjunta
> > xx<-yy<-seq(0,1,0.02)
> > zz <- outer(xx, yy, f)
> > persp(xx,yy,zz)
> > #------
> > ¿Cómo obtener la densidad marginal de X? Algo como:
> >
> > # fx<-function(x){integral desde 0 hasta Inf de f(x,y)dy}
> >
> > Muchas gracias de antemano por la ayuda.
> >
> > Saludos.
> >
> > César Escalante C.
> >
> > 	[[alternative HTML version deleted]]
> >
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es@r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
> 
> 
> 
> ------------------------------
> 
> Message: 5
> Date: Tue, 03 May 2011 09:47:46 +0200
> From: José Trujillo Carmona <trujillo@unex.es>
> To: r-help-es <r-help-es@r-project.org>
> Subject: [R-es] [Fwd: Re:  Patron de curvas biologicas]
> Message-ID: <4DBFB322.5070403@unex.es>
> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed"
> 
> Creo que debes utilizar "Análisis de Datos Funcionales":
> 
> Applied functional data analysis: methods and case studies James O. 
> Ramsay,B. W. Silverman
> Functional Data Analysis with R and MATLAB  J. O. Ramsay,Giles 
> Hooker,Spencer Graves
> 
> Pero no domino el tema, lo siento.
> 
> -------- Mensaje original --------
> Asunto: 	Re: [R-es] Patron de curvas biologicas
> Fecha: 	Sun, 1 May 2011 13:42:39 -0500
> De: 	Carlos Andres Perez Angarita <caaperezan@gmail.com>
> Para: 	trujillo@unex.es
> Referencias: 	<BANLkTimGpSOMqjmBTfVDhKPWvZtxnA65bg@mail.gmail.com> 
> <4DBD9638.5030403@unex.es>
> 
> 
> 
> 
> Las considero como series temporales, sin embargo te adjunto una imagen 
> de ellas, como podria determinar una patrón de curva, mediante R, muchas 
> gracias
> 
> CARLOS ANDRES
> 
> 
> El 1 de mayo de 2011 12:19, José Trujillo Carmona <trujillo@unex.es 
> <mailto:trujillo@unex.es>> escribió:
> 
>     Tendrás que explicarte mejor.
> 
>     ¿Qué quiere decir curvas? ¿Series temporales? ¿Variables que son
>     funciones unas de otras? ...
> 
>     Carlos Andres Perez Angarita escribió:
> 
>         Cordial Saludo
> 
>         Tengo muchas curvas de tipo biologico y ademas son de un
>         comportamiento
>         similar, que tipo de analisis requiero para determinar un patron
>         de curva,
>         en aproximadamente una muestra de 30 a 40. He investigado y nose
>         si deba
>         utilizar ANALISIS  DE COMPONENTES PRINICIPALES, CORRELACION
>         CANONICA, entre
>         otros, Gracias por la atencion prestada
> 
>                [[alternative HTML version deleted]]
> 
>         _______________________________________________
>         R-help-es mailing list
>         R-help-es@r-project.org <mailto:R-help-es@r-project.org>
>         https://stat.ethz.ch/mailman/listinfo/r-help-es
>          
> 
> 
>     -- 
>     _____---^---_____
> 
>     Univ. de Extremadura
>     Dept. Matemáticas.
>     Despacho B29
>     Tf: + 34 924 289 300
>     Ext. 86823
> 
> 
> 
> -- 
> _____---^---_____
> 
> Univ. de Extremadura
> Dept. Matemáticas.
> Despacho B29
> Tf: + 34 924 289 300
> Ext. 86823
> 
> 
> ------------ próxima parte ------------
> A non-text attachment was scrubbed...
> Name: Funciones.JPG
> Type: image/jpeg
> Size: 119582 bytes
> Desc: no disponible
> URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20110503/39fe4d27/attachment.jpe>
> 
> ------------------------------
> 
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
> 
> 
> Fin de Resumen de R-help-es, Vol 27, Envío 4
> ********************************************
 		 	   		  
	[[alternative HTML version deleted]]

