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

Vocabulary

math.statistics.private

Inputs

histogram	an object
method	a quotation with stack effect ( min max -- rank )

Outputs

assoc

an 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 + _ keep -rot ] H{ } assoc-map-as nip ; inline