【Covariance】

1. Inputs: DependentVal(Numeric), IndependentVal(Numeric), Len(Numeric);
   
2. Variables: var0(0), var1(0), var2(0), var3(0);
   
3. 
   
4. If Len <> 0 Then Begin
   
5.         var0 = Average(IndependentVal, Len);
   
6.         var1 = Average(DependentVal, Len);
   
7.         For var2 = 0 To Len - 1 Begin
   
8.                  var3 = var3 + (IndependentVal[var2] - var0) * (DependentVal[var2] - var1);
   
9.         End;
   
10.         Covariance = var3 / Len;
    
11. End;

复制代码