龙听期货论坛's Archiver

C
+
+
版
量
化		 微信： QQ：

龙听 发表于 2022-11-2 10:47

【LinRegSlope_a】

[code]Inputs: IndArray[Xsize](NumericArrayRef), DepArray[Ysize](NumericArrayRef), VArraySize(Numeric);
Variables: var0(0), var1(0), var2(0), var3(0), var4(0);
                                                                                                     
condition1 = VArraySize <= MinList(Xsize, Ysize) ;
If condition1 Then Begin
        var2 = 0;
        var3 = 0;
        For value1 = 1 To VArraySize Begin
                var2 = var2 + (IndArray[value1] * DepArray[value1]);
                var3 = var3 + Square(IndArray[value1]);
        End;
        var0 = Summation_a(IndArray, VArraySize);
        var1 = Summation_a(DepArray, VArraySize);
       
        condition1 = var2 <> 0 AND var0 <> 0 ;
        If condition1 Then
                var4 = ((VArraySize * var2) - (var0 * var1)) / ((VArraySize * var3) - Square(var0))
        Else
                var4 = 0;
End
Else
        var4 = 0;

LinRegSlope_a = var4;
[/code]

页: [1]