Deu uma melhorada Rodrigo. Se alguém tiver alguma outra sugestão, agradeço. Valeu!! Edson Lira Estatístico Manaus-Amazonas ________________________________ De: Rodrigo Coster <rcoster@gmail.com> Para: r-br@listas.c3sl.ufpr.br; Edson Lira <edinhoestat@yahoo.com.br> Enviadas: Segunda-feira, 18 de Fevereiro de 2013 10:12 Assunto: Re: [R-br] tabela muito grande Não vai ficar tao bonito quanto o resultado do ftable(), mas é uma solução: tab <- data.frame(ftable(addmargins(GEN, c(1,2,3,4), FUN=list(Total = sum)))) tab[tab$Freq != 0,] 2013/2/18 Edson Lira <edinhoestat@yahoo.com.br> Bom dia a todos.
Estou analisando um banco que necessito fazer a seguinte rotina:
GEN<-table(m$LOCALDENAS,m$MUNICIPIOR,m$GENOTIPAGE,m$REG) ftable(addmargins(GEN, c(1,2,3,4), FUN=list(Total = sum)))
Que dá essa saída:
D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0
0
CAREIRO A 0 0 0 0 0 0 0 0 0 0 0 0 D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0 0 CASTANHO A 0 0 0 0 0 0 0 0 0 0 0 0 D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0 0 COARI A 0 0 0 0 0 0 0 0 0 0 0 0 D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0 0 CODAJAS A 0 0 0 0 0 0 0 0 0 0 0 0 D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0 0 EIRUNEPE A 0 0 0 0 0 0 0 0 0 0 0 0 D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0 0 IPIXUNA A 0 0 0 0 0 0 0 0 0 0 0 0 D 0 0 0 0 0 0 0 0 0 0 0 0 F 0 0 0 0 0 0 0 0 0 0 0 0 Total 0 0 0 0 0 0 0 0 0 0 0 0 ITAITUBA A 0 0 0 0 0 0 0 0 0 0 0 0
A sáida é muito grande e não consigo visualizar na tela de saída do R.
Como eliminar os zeros.
Edson Lira Estatístico Manaus-Amazonas _______________________________________________ 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.