Board logo

标题: 【StdErrorArray2】 [打印本页]

作者: 龙听    时间: 2022-11-2 13:27     标题: 【StdErrorArray2】

  1. inputs:
  2.         IndepArray[XSize]( numericarray ),                       
  3.         DepArray[YSize]( numericarray ),                       
  4.         Size( numericsimple ) ;                                                      
  5.                                                                 

  6. variables:
  7.         var0( 0 ),
  8.         var1( 0 ),
  9.         var2( 0 ),
  10.         var3( 0 ),
  11.         var4( 0 ),
  12.         var5( 0 ),
  13.         var6( 0 ),
  14.         var7( 0 ),
  15.         var8( 0 ) ;

  16. StdErrorArray2 = 0 ;

  17. if Size > 2 then
  18.         begin
  19.         var0 = AverageArray( IndepArray, Size ) ;
  20.         var1 = AverageArray( DepArray, Size ) ;
  21.         var4 = 0 ;
  22.         var5 = 0 ;
  23.         var6 = 0 ;
  24.         for var7 = 1 to Size
  25.                 begin
  26.                 var2 = IndepArray[var7] - var0 ;
  27.                 var3 = DepArray[var7] - var1 ;
  28.                 var4 = var4 + Square( var2 ) ;
  29.                 var5 = var5 + Square( var3 ) ;
  30.                 var6 = var6 + var2 * var3 ;
  31.                 end ;
  32.         var8 = ( var5 - Square( var6 ) / var4 ) / ( Size - 2 ) ;
  33.         if var8 > 0 then
  34.                 StdErrorArray2 = SquareRoot( var8 ) ;
  35.         end ;
复制代码





欢迎光临 龙听期货论坛 (http://qhlt.club/) Powered by Discuz! 7.2