let spearman (arr1:float array) (arr2: float array) =
  let arr1,arr2 = rank arr1, rank arr2 in
  pearson arr1 arr2