Utwórz histogram dla wartości ważonych
Jeśli mam wektor (np.v<-runif(1000)
), Mogę narysować jego histogram (który będzie wyglądał mniej więcej jako linia pozioma, ponieważv
jest próbką z rozkładu jednorodnego).
Przypuśćmy jednak, że mam wektor i związane z nim wagi (np.w<-seq(1,1000)
opróczv<-sort(runif(1000))
). Np. Jest to wyniktable()
na znacznie większym zestawie danych.
Jak wykreślić nowy histogram? (powinno wyglądać mniej jaky=x
wiersz w tym przykładzie).
Myślę, że mógłbym odwrócić skutkitable
używającrep
(hist(rep(v,w))
) ale to „rozwiązanie” wydaje się brzydkie i obfite w zasoby (tworzy wektor pośredni wielkościsum(w)
) i obsługuje tylko wagi całkowite.