Crear un histograma para los valores ponderados.

Si tengo un vector (por ejemplo,v<-runif(1000)), Puedo trazar su histograma (que se verá, más o menos, como una línea horizontal porquev Es una muestra de la distribución uniforme).

Sin embargo, supongamos que tengo un vector y sus pesos asociados (por ejemplo,w<-seq(1,1000) además dev<-sort(runif(1000))). Por ejemplo, este es el resultado detable() en un conjunto de datos mucho más grande.

¿Cómo trazo el nuevo histograma? (Debería parecerse más o menos a lay=x línea en este ejemplo).

Supongo que podría revertir los efectos detable mediante el usorep (hist(rep(v,w))) pero esta "solución" parece fea y tiene muchos recursos (crea un vector de tamaño intermediosum(w)), y solo soporta pesos enteros.