
19 Jun
2013
19 Jun
'13
00:17
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