[R-br] soma na tabela

[Edson Lira]

André, esta rotina gera todas as tabelas de um banco de dados, se você tem por exemplo, sexo, idade, bairro, etc... A rotina gera tabelas com a quantidade e percentual para todas elas. Por exemplo para este banco abaixo gera-se uma tabela para cada variável.

  quest nome sexo idade est_civ    dt_nasc tempo cons_pub cons_part satisf nota_cm doe_antes
1     1   JW    M    24     CAS 1988-06-21   310        5         0    NÃO       5       NÃO
2     2   HH    M    33     SOL 1979-03-27    45        1         0    NÃO       2       NÃO
3     3    A    M    29     SOL 1983-06-15    30        0         0    NÃO      NA       SIM
4     4  ABC    M    32     SOL 1980-05-17    60        0         1    NÃO       1       NÃO

[  ]'s. 
Edson Lira
Estatístico
Manaus-Amazonas


________________________________
 De: "andrebvs em bol.com.br" <andrebvs em bol.com.br>
Para: r-br em listas.c3sl.ufpr.br; Edson Lira <edinhoestat em yahoo.com.br> 
Enviadas: Terça-feira, 18 de Junho de 2013 20:48
Assunto: Re: [R-br] soma na tabela
 


Por gentileza Edson, nos passe um exemplo reproduzível.

Att.
André BVS


________________________________
 
Em 18/06/2013 21:17, Edson Lira < edinhoestat em yahoo.com.br > escreveu:
Boa noite caros amigos, 
 
A rotina abaixo
 
tabelas<-function(x){
Qtde<-table(x)
Perc<-100*prop.table(table(x))
cbind(Qtde,Perc)
}
 
Gera tabelas do tipo:
 
$ida
                Qtde Perc
20 |-- 30 anos    39   34
30 |-- 40 anos    57   50
40 anos ou mais   19   17
 
A idade tem valores de 21 a 47 anos. 
 
Montei a rotina
 
 
m1$ida<-rep(NA,length(m1$idade))
summary(m1$idade)
sd(m1$idade,na.rm=T)
m1$ida[20<=m1$idade&m1$idade<30]<-"20 |-- 30 anos"
m1$ida[30<=m1$idade&m1$idade<40]<-"30 |-- 40 anos"
m1$ida[m1$idade>=40]<-"40 anos ou mais"
 
 
Como faço para acrescentar a soma de Qtde e Perc?
 
 
 
[  ]'s.
 
Edson Lira
Estatístico
Manaus-Amazonas
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130618/be116f73/attachment.html>