Deu uma melhorada Rodrigo. Se alguém tiver alguma outra sugestão, agradeço.
Valeu!!
Edson Lira
Estatístico
Manaus-Amazonas
________________________________
De: Rodrigo Coster <[email protected]>
Para: [email protected]; Edson Lira <[email protected]>
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 <[email protected]>
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
>[email protected]
>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
[email protected]
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.
