[R-es] elegir todas las posibles semimuestras.
José Luis Cañadas
canadasreche en gmail.com
Vie Abr 16 13:25:02 CEST 2010
Gracias, estaba viendo por el paquete combinat, pero esta también me vale.
Javier Muñoz escribió:
> Hola Jose Luis.
>
> Una posible solución:
>
> require(gtools)
> est <- apply(combinations(6, 3), 1, function(ind) mean(x[ind]) *
> mean(y[ind]))
>
>
> El 16 de abril de 2010 12:44, José Luis Cañadas
> <canadasreche en gmail.com <mailto:canadasreche en gmail.com>> escribió:
>
> Buenas.
>
> Tengo los dos siguientes valores de las variables x e y de una
> muestra de tamaño 6
>
> x<-c(3,2,6,5,4,6)
> y<-c(6,2,2,1,3,3)
>
> Y calculo el estimador mean(x) * mean(y) como est<-mean(x)*mean(y)
>
> Mi problema es que ahora quiero calcular este estimador para todas
> las posibles semimuestras de tamaño 3. Es decir, la primera
> muestra estaría constituida por los 3 primeros datos de cada
> variable. Por ejemplo
>
> muestra 1. (1,2,3)
> muestra 2. (1,2,4)
> muestra 3. (1,2,5)
> muestra 4 (1,2,6)
> muestra 5. (1,3,4)
>
> Así hasta la muestra 10, teniendo en cuenta que las muestras que
> contengan los mismos elementos sólo la consideramos una vez.
>
> Para la primera muestra puedo hacer
> est.1<-mean(x[1:3])*mean(y[1:3])
> Para la segunda
> est.2<-mean(x[c(1,2,4)])*mean(y[c(1,2,4)])
>
> Y así, sucesivamente. Estoy intentando hacerlo de forma que sea
> automática, he probado con un ciclo for , pero no me sale.
>
> ¿ideas?
>
>
> Gracias
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org <mailto:R-help-es en r-project.org>
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>
Más información sobre la lista de distribución R-help-es