Function R-Score

Part of:

package cl-mathstats
( r-score < number-list-1 > < number-list-2 > )

Takes two sequences and returns the correlation coefficient.
Formula: Sum (Cross-product (Difference-list (number-list-1)
Difference-list (number-list-2)) /
(Sqrt (Sum-of-Squares (number-list-1) *
Sum-of-Squares (number-list-2)))).