Re: [R-br] Função usando sample com condição

2014-05-10 Por tôpico Éder Comunello
Senhores, bom dia! Alexandre, você falou em 6 áreas, mas seu código está definido 5. Sugiro verificar acrescentando as linhas que seguem ao seu código: areas - as.vector(unique(dados$ab)); areas table(dados$proj.talhao, dados$n.talhao) Tendo verificado, adicione também as linhas que seguem e

[R-br] Função usando sample com condição

2014-05-09 Por tôpico ASANTOS
Boa noite listeiros, Criei o seguinte data frame: proj.talhao-sort(rep(c(tamandua,itapagi,corrego),100)) n.talhao-sort(rep(c(144,256,356,144,301,180),50)) dados-as.data.frame(cbind(proj.talhao,n.talhao)) dados$medidas-rnorm(nrow(dados),300) head(dados) Agora gostaria de solicitar a

Re: [R-br] Função usando sample com condição

2014-05-09 Por tôpico Ricardo Solar
Olá, não sei se entendi bem o que quer, mas você pode mandar ele fazer o sample de row.names use_talhao - sample(row.names(dados), 20) dados2 - dados[use_talhao,] para fazer isso por talhão, se esse for o caso, use um for, ou algo do tipo. Abs == Dr.

Re: [R-br] Função usando sample com condição

2014-05-09 Por tôpico ASANTOS
Ricardo não é bem isso, seria sample(row.names(dados), 20) a cada mudança de n.talhao (se fosse númerico ate tenho algumas idéias) no código: proj.talhao-sort(rep(c(tamandua,itapagi,corrego),100)) n.talhao-sort(rep(c(144,256,356,144,301,180),50))

Re: [R-br] Função usando sample com condição

2014-05-09 Por tôpico ASANTOS
Pessoal, Comecei a evoluir um pouco, mas a programação em R tem sido a limitação, segue CRM: proj.talhao-sort(rep(c(tamandua,itapagi,corrego),100)) n.talhao-sort(rep(c(144,256,356,144,301,180),50)) dados-as.data.frame(cbind(proj.talhao,n.talhao)) dados$medidas-rnorm(nrow(dados),300)

Re: [R-br] Função usando sample com condição

2014-05-09 Por tôpico Rodrigo Coster
Pelo que eu entendi, é isso que tu quer: install.packages('data.table') # Rodar só se nao tiver o pacote data.table instalado. Da para fazer com data.frame comum, mas com data.table é mais fácil. require(data.table) dados - data.table(dados) dados[, sample(medidas, 20), by = c('proj.talhao',