CMR.

ht <- hist(precip); rug(precip)
str(ht)

apropos("weight")
weighted.mean(x=ht$mids, w=ht$counts)
mean(precip)

Reforçando que não é aconselhável usar a média a partir dos dados agrupados
(ponto médio/frequências) se é possível calcular a média a partir dos
valores individuais.

À disposição.
Walmes.

​
_______________________________________________
R-br mailing list
[email protected]
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.

Responder a