Benilton, Preparei outro exemplo (bem tosco =P ): set.seed(1) x <- sample(c('Abobrinha','Cachorro','Carro','Avião','Beija-Flor'),150,T) table(x) ### vamos supor que queira juntar Abobrinha e Avião; ### Cachorro e Beija-Flor y <- as.character(factor(x, levels=c('Abobrinha','Cachorro','Carro','Avião','Beija-Flor'), labels=c('Abobrinha e Avião','Cachorro e Beija-Flor','Carro', 'Abobrinha e Avião','Cachorro e Beija-Flor'))) table(y) #> table(x) #x # Abobrinha Avião Beija-Flor Cachorro Carro # 22 37 24 33 34 #> table(y) #y # Abobrinha e Avião Cachorro e Beija-Flor Carro # 59 57 34 Atenciosamente, Leandro Lins Marino Centro de Avaliação Fundação CESGRANRIO Rua Santa Alexandrina, 1011 - 2º andar Rio de Janeiro, RJ - CEP: 20261-903 R (21) 2103-9600 R.:236 ( leandro@cesgranrio.org.br Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE Esta mensagem, incluindo seus anexos, pode conter informacoes privilegiadas e/ou de carater confidencial, nao podendo ser retransmitida sem autorizacao do remetente. Se voce nao e o destinatario ou pessoa autorizada a recebe-la, informamos que o seu uso, divulgacao, copia ou arquivamento sao proibidos. Portanto, se você recebeu esta mensagem por engano, por favor, nos informe respondendo imediatamente a este e-mail e em seguida apague-a. -----Mensagem original----- De: r-br-bounces@listas.c3sl.ufpr.br [mailto:r-br-bounces@listas.c3sl.ufpr.br] Em nome de Benilton Carvalho Enviada em: quarta-feira, 24 de agosto de 2011 16:49 Para: r-br@listas.c3sl.ufpr.br Assunto: Re: [R-br] RES: Factors no R Leandro, nao sei se entendi o q vc quis perguntar. No caso do seu exemplo em particular: set.seed(1) u = runif(150,0,10) res = cut(u, c(0, 2.5, 6.5, 8.5, 10), include.lowest=TRUE, labels=paste("Tipo", 1:4)) table(res)
table(res) res Tipo 1 Tipo 2 Tipo 3 Tipo 4 33 64 33 20
Se vc se refere a particionar um vetor em grupos, use split(): set.seed(1) u = runif(150, 0, 10) grp = sample(letters[1:5], 150, rep=TRUE) split(u, grp) b _______________________________________________ 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.