(r) ( x-mean y-mean x-seq y-seq x-std y-std -- r )

Vocabulary

math.statistics.private

Inputs

x-mean	an object
y-mean	an object
x-seq	an object
y-seq	an object
x-std	an object
y-std	an object

Outputs

r

an object

Definition

USING: kernel math sequences ;

IN: math.statistics.private

: (r) ( x-mean y-mean x-seq y-seq x-std y-std -- r )
    * recip [ [ r-sum-diffs ] keep length 1 - / ] dip * ;