my (%hashref_return_A) = correlation(\@primarys_array, \@secondarys_array);
####
Reference found where even-sized list expected at script.pl line 576
####
sub correlation {
my ($x_ref, $y_ref) = @_;
my $lfit = Statistics::LineFit->new();
$lfit->setData($x_ref, $y_ref);