gini ( seq -- x )

Vocabulary

math.extras

Inputs

seq

an object

Outputs

x

an object

Definition

USING: kernel math math.extras.private sequences ;

IN: math.extras

: gini ( seq -- x ) dup length 1 <= [ drop 0 ] [ (gini) ] if ;