weighted.median(c(7,1,2,4,10,15),c(1,1/3,1/3,1/3,1,1)) # 8.5 [even number]
weighted.median(c(1,2,4,7,10,15),c(1/3,1/3,1/3,1,1,1)) # ordered differently 8.5
weighted.median(c(7,7/3,10,15)) # same as previous, but unweighted:
# '1','2','4 of weights='1/3' are replaced by '7/3' (weight=1)
weighted.median(c(7,1,2,4,10),c(1,1/3,1/3,1/3,1)) # 7
weighted.median(c(7,1,2,4,10)) # 4
weighted.median(c(7,1,NA,4,10),c(1,1/3,1/3,1/3,1),na.rm =TRUE) # 8.5}
<keyword>distribution</keyword>
Run the code above in your browser using DataLab