Exibir categoria quando não há elemento - summarize {Hmisc}

Caros, boa noite. Tudo bem? Vejam o CMR: dados = data.frame(valor=rnorm(100),var=sample(LETTERS[c(1,2,3,5)],100,replace=T),peso=rpois(100,2)) dados[1:10,] dados$var <- factor(dados$var,levels=LETTERS[1:5]) table(dados$var) g1 <- function(y) wtd.mean(y[,1],y[,2]) summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med') Quando faço o table, aparece que a categoria D não teve ninguém, ou seja 0. Como posso fazer para forçar ela aparecer no summarize? Tenho depois uma serie de rotinas que utilizo as funcoes wtd... do Hmisc. No entanto preciso que todas as categorias que estão no fator sejam sempre exibidas. obrigado pela ajuda. abs Leandro

summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med') Error: could not find function "summarize"
2015-03-06 17:54 GMT-03:00 Leandro Marino < leandromarino@leandromarino.com.br>:
Caros,
boa noite. Tudo bem?
Vejam o CMR:
dados = data.frame(valor=rnorm(100),var=sample(LETTERS[c(1,2,3,5)],100,replace=T),peso=rpois(100,2)) dados[1:10,] dados$var <- factor(dados$var,levels=LETTERS[1:5]) table(dados$var) g1 <- function(y) wtd.mean(y[,1],y[,2]) summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med')
Quando faço o table, aparece que a categoria D não teve ninguém, ou seja 0.
Como posso fazer para forçar ela aparecer no summarize? Tenho depois uma serie de rotinas que utilizo as funcoes wtd... do Hmisc. No entanto preciso que todas as categorias que estão no fator sejam sempre exibidas.
obrigado pela ajuda.
abs Leandro
_______________________________________________ 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.

Thiago, esqueci de mencionar especificamente sobre o pacote. Esta função é do Hmisc. Em 9 de março de 2015 10:49, Thiago Serafim <thiago.serafim@gmail.com> escreveu:
summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med') Error: could not find function "summarize"
2015-03-06 17:54 GMT-03:00 Leandro Marino < leandromarino@leandromarino.com.br>:
Caros,
boa noite. Tudo bem?
Vejam o CMR:
dados = data.frame(valor=rnorm(100),var=sample(LETTERS[c(1,2,3,5)],100,replace=T),peso=rpois(100,2)) dados[1:10,] dados$var <- factor(dados$var,levels=LETTERS[1:5]) table(dados$var) g1 <- function(y) wtd.mean(y[,1],y[,2]) summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med')
Quando faço o table, aparece que a categoria D não teve ninguém, ou seja 0.
Como posso fazer para forçar ela aparecer no summarize? Tenho depois uma serie de rotinas que utilizo as funcoes wtd... do Hmisc. No entanto preciso que todas as categorias que estão no fator sejam sempre exibidas.
obrigado pela ajuda.
abs Leandro
_______________________________________________ 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.

matrix(by(dados[,c(1,3)], dados[, 'var'], g1), dimnames = list(levels(dados$var), 'med')) 2015-03-09 10:54 GMT-03:00 Leandro Marino < leandromarino@leandromarino.com.br>:
Thiago,
esqueci de mencionar especificamente sobre o pacote. Esta função é do Hmisc.
Em 9 de março de 2015 10:49, Thiago Serafim <thiago.serafim@gmail.com> escreveu:
summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med') Error: could not find function "summarize"
2015-03-06 17:54 GMT-03:00 Leandro Marino < leandromarino@leandromarino.com.br>:
Caros,
boa noite. Tudo bem?
Vejam o CMR:
dados = data.frame(valor=rnorm(100),var=sample(LETTERS[c(1,2,3,5)],100,replace=T),peso=rpois(100,2)) dados[1:10,] dados$var <- factor(dados$var,levels=LETTERS[1:5]) table(dados$var) g1 <- function(y) wtd.mean(y[,1],y[,2]) summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med')
Quando faço o table, aparece que a categoria D não teve ninguém, ou seja 0.
Como posso fazer para forçar ela aparecer no summarize? Tenho depois uma serie de rotinas que utilizo as funcoes wtd... do Hmisc. No entanto preciso que todas as categorias que estão no fator sejam sempre exibidas.
obrigado pela ajuda.
abs Leandro
_______________________________________________ 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.
_______________________________________________ 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.
-- Luís Gustavo Silva e Silva

Outra ideia: tmp <- summarize(dados[,c(1,3)], llist(var=dados$var), g1,stat.name = 'med') merge(levels(dados$var), tmp, all.x=T, by.x="x", by.y="var") Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]
participantes (4)
-
Leandro Marino
-
Luis G. S. e Silva
-
Thiago Serafim
-
Éder Comunello