主题：TB转金字塔

SumX = N * ( N - 1 ) * 1/2;

SumY = Summation( Close, N) ;

for i = 0 to N-1

{

SumXY = SumXY + i * Close[i] ;

SumXX = SumXX + i * i ;

SumYY = SumYY + Close[i] * Close[i] ;

}

R2 = (SumXY - N*(SumX/N)*(SumY/N)) / Sqrt((SumXX - SumX*SumX/N)*(SumYY - SumY*SumY/N));