quebrar amostra através de sorteio aleatório sem reposição

Olá pessoal,estou com dúvida na hora de realizar este problema, O problema é: Gero uma amostra de tamanho 100 por exemplo com dist. poisson amostra<-rpois(100,lambda=2.5) amostra [1] 1 4 8 0 2 4 2 1 2 2 6 3 3 0 2 2 1 1 1 2 1 2 4 2 2 2 1 0 4 6 5 2 1 2 2 3 3 1 2 [40] 0 3 5 5 5 2 2 2 5 3 2 2 3 3 2 2 2 3 3 0 2 2 1 2 1 1 4 2 0 3 4 2 2 3 4 4 2 4 1 [79] 2 2 1 0 2 1 4 3 2 2 0 3 3 1 3 3 2 3 3 1 5 0 agora com esses valores quero podemos dizer que quebrar em três amostas, a primeira de tamanho 25, a segunda, 40, e a terceira 35. Só que o problema é que tenho que sortear valores para a primeira amostra e estes valores tem que sair da amostra original. ou seja, quando sortear para a primeira amostra, chamar amostra1, só deve restar 75 valores para que eu possa dividir e mais duas. Estava pensando em utilizar o sample, para sortear os valores e alocar a cada amostra, mas como faço para remover os valores entre uma amostra e outra? -- Jodavid Ferreira Responsável pela comissão de Comunicação do MJ da RCCPB - http://rccpbjovem.com Membro da equipe Estadual do Ministério de Comunicação da RCCPB - http://rccpb.com.br Responsável pelo Ministério de Comunicação do Grupo de Oração Boa Esperança - http://grupoboaesperanca.com Bacharelando em Estatística - UFPB Estagiário no Laboratório de Estatística Aplicada ao Processamento de Imagens e Geoprocessamento - http://de.ufpb.br/~leapig Site Pessoal - http://jodavidferreira.com Twitter - @JodavidFerreira <http://twitter.com/JodavidFerreira>

o exercicio e' verificar o pq isso funciona... set.seed(1) amostra <- rpois(100,lambda=2.5) grps <- unlist(mapply(rep, 1:3, c(25, 40, 35))) sets <- split(amostra, sample(grps)) b Em 13 de fevereiro de 2014 00:47, Jodavid Ferreira <jodavid.arts@gmail.com>escreveu:
Olá pessoal,estou com dúvida na hora de realizar este problema,
O problema é:
Gero uma amostra de tamanho 100 por exemplo com dist. poisson
amostra<-rpois(100,lambda=2.5) amostra
[1] 1 4 8 0 2 4 2 1 2 2 6 3 3 0 2 2 1 1 1 2 1 2 4 2 2 2 1 0 4 6 5 2 1 2 2 3 3 1 2 [40] 0 3 5 5 5 2 2 2 5 3 2 2 3 3 2 2 2 3 3 0 2 2 1 2 1 1 4 2 0 3 4 2 2 3 4 4 2 4 1 [79] 2 2 1 0 2 1 4 3 2 2 0 3 3 1 3 3 2 3 3 1 5 0
agora com esses valores quero podemos dizer que quebrar em três amostas, a primeira de tamanho 25, a segunda, 40, e a terceira 35. Só que o problema é que tenho que sortear valores para a primeira amostra e estes valores tem que sair da amostra original.
ou seja, quando sortear para a primeira amostra, chamar amostra1, só deve restar 75 valores para que eu possa dividir e mais duas.
Estava pensando em utilizar o sample, para sortear os valores e alocar a cada amostra, mas como faço para remover os valores entre uma amostra e outra?
-- Jodavid Ferreira Responsável pela comissão de Comunicação do MJ da RCCPB - http://rccpbjovem.com Membro da equipe Estadual do Ministério de Comunicação da RCCPB - http://rccpb.com.br Responsável pelo Ministério de Comunicação do Grupo de Oração Boa Esperança - http://grupoboaesperanca.com Bacharelando em Estatística - UFPB Estagiário no Laboratório de Estatística Aplicada ao Processamento de Imagens e Geoprocessamento - http://de.ufpb.br/~leapig Site Pessoal - http://jodavidferreira.com Twitter - @JodavidFerreira <http://twitter.com/JodavidFerreira>
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.

Fucioncou perfeitamente, Obg! Em 13 de fevereiro de 2014 00:47, Jodavid Ferreira <jodavid.arts@gmail.com>escreveu:
o exercicio e' verificar o pq isso funciona...
set.seed(1) amostra <- rpois(100,lambda=2.5) grps <- unlist(mapply(rep, 1:3, c(25, 40, 35))) sets <- split(amostra, sample(grps))
b
Em 13 de fevereiro de 2014 00:47, Jodavid Ferreira <[hidden email]<http://r-br.2285057.n4.nabble.com/user/SendEmail.jtp?type=node&node=4661567&i=0>
escreveu:
Olá pessoal,estou com dúvida na hora de realizar este problema,
O problema é:
Gero uma amostra de tamanho 100 por exemplo com dist. poisson
amostra<-rpois(100,lambda=2.5) amostra
[1] 1 4 8 0 2 4 2 1 2 2 6 3 3 0 2 2 1 1 1 2 1 2 4 2 2 2 1 0 4 6 5 2 1 2 2 3 3 1 2 [40] 0 3 5 5 5 2 2 2 5 3 2 2 3 3 2 2 2 3 3 0 2 2 1 2 1 1 4 2 0 3 4 2 2 3 4 4 2 4 1 [79] 2 2 1 0 2 1 4 3 2 2 0 3 3 1 3 3 2 3 3 1 5 0
agora com esses valores quero podemos dizer que quebrar em três amostas, a primeira de tamanho 25, a segunda, 40, e a terceira 35. Só que o problema é que tenho que sortear valores para a primeira amostra e estes valores tem que sair da amostra original.
ou seja, quando sortear para a primeira amostra, chamar amostra1, só deve restar 75 valores para que eu possa dividir e mais duas.
Estava pensando em utilizar o sample, para sortear os valores e alocar a cada amostra, mas como faço para remover os valores entre uma amostra e outra?
-- Jodavid Ferreira Responsável pela comissão de Comunicação do MJ da RCCPB - http://rccpbjovem.com Membro da equipe Estadual do Ministério de Comunicação da RCCPB - http://rccpb.com.br Responsável pelo Ministério de Comunicação do Grupo de Oração Boa Esperança - http://grupoboaesperanca.com Bacharelando em Estatística - UFPB Estagiário no Laboratório de Estatística Aplicada ao Processamento de Imagens e Geoprocessamento - http://de.ufpb.br/~leapig Site Pessoal - http://jodavidferreira.com Twitter - @JodavidFerreira <http://twitter.com/JodavidFerreira>
_______________________________________________ R-br mailing list [hidden email]<http://r-br.2285057.n4.nabble.com/user/SendEmail.jtp?type=node&node=4661567&i=1> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list [hidden email]<http://r-br.2285057.n4.nabble.com/user/SendEmail.jtp?type=node&node=4661567&i=2>
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
-- Jodavid Ferreira Responsável pela comissão de Comunicação do MJ da RCCPB - http://rccpbjovem.com Membro da equipe Estadual do Ministério de Comunicação da RCCPB - http://rccpb.com.br Responsável pelo Ministério de Comunicação do Grupo de Oração Boa Esperança - http://grupoboaesperanca.com Bacharelando em Estatística - UFPB Estagiário no Laboratório de Estatística Aplicada ao Processamento de Imagens e Geoprocessamento - http://de.ufpb.br/~leapig Site Pessoal - http://jodavidferreira.com Twitter - @JodavidFerreira <http://twitter.com/JodavidFerreira>
participantes (2)
-
Benilton Carvalho
-
Jodavid Ferreira