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