rankings ( histogram method: ( min max -- rank ) -- assoc )


Vocabulary
math.statistics.private

Inputs
histograman object
methoda quotation with stack effect ( min max -- rank )


Outputs
assocan object


Definition
USING: assocs kernel math sorting ;

IN: math.statistics.private

: rankings
( histogram method: ( min max -- rank ) -- assoc )
[ sort-keys 0 swap ] dip [ [ swapd dupd + ] ] dip
[ keep -rot ] curry compose H{ } assoc-map-as nip ; inline