Meu caro, para gerar tabelas simples uso a rotina abaixo:
Seja o banco: df
df[df==""]<-NA
tabelas
<-
function
(
x
){
Qtde
<-table(
x
)
Perc
<-
100
*prop.table(table(
x
))
tab
<-cbind(
Qtde
,
Perc
)
Total
<-colSums(
tab
)
rbind(
tab
,
Total
)
}
apply(
df
,
2
,
tabelas
)
Você terá todas tabelas com Qtde e perc de seu banco.
Para gerar tabelas com duas ou mais entradas, uso:
v12
<-
100
*prop.table(table(
df
$
var1
,
df
$
var2
))
ftable(addmargins(
v12
, c(
1
,
2
),
FUN
=list(
Total
=
sum
)))
[ ]'s
Edson Lira
Estatístico
Manaus-Amazonas
Em Quarta-feira, 3 de Junho de 2015 23:00, Paulo Abreu <abreups@me.com> escreveu:
As funções melt e dcast fazem a mágica.
> Em 03/06/2015, à(s) 10:47, Diego Miro <
d.miro1089@gmail.com
> escreveu:
>
> Alexandre, dependendo do que você quer fazer há algumas opções.
>
> Procure pelas funções xtable() e aggregate()
>
> No pacote reshape2 tem a função cast() também.
>
> Um abraço.
>
>
> _______________________________________________
> 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.
_______________________________________________
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.