Algorithm 5 Covariance ($dataset,determ,$ p$, rows,cols$)

1: for $i=1;i<cols;i=i+1$ do 2: for $j=1;j<cols;j=j+1$ do 3:  $sum=0$ 4:  for $k=1;k<rows;k=k+1$ do 5:   $sum+=\left(dataset\right[k\left]\right[i]-p[i\left]\right)*\left(dataset\right[k\left]\right[j]-p[j\left]\right)$; 6:  end for 7:  $determ\left[j\right]\left[i\right]=sum/rows$; 8: end for 9: end for