anchor.diff:          let TTest = Testing.TestStatistics.createTTest statistic (sumOfSquares.Count - 2.)
           TTest
   
  -    let calulcateDetermination (sumOfSquares:SumOfSquares) =
  +    let calculateDetermination (sumOfSquares:SumOfSquares) =
           sumOfSquares.Regression / sumOfSquares.Total
           
   
  
positive.code:         {Regression=ssr; Error=sse; Total=sst; SSxx=ssxx; SSxy=ssxy; MeanX = meanX;MeanY =meanY; Count=count}
                
      ///  
      let calulcateSumOfSquares (fitFunc:float -> float)  (x_data : seq<float>) (y_data : seq<float>) = 
          let meanX = Seq.mean x_data
          let meanY = Seq.mean y_data
          let count,sst,sse,ssxx,ssxy =
  
negative.code:         ///    regression approximates the real data points. An R^2 of 1.0 indicates that the
          ///    regression perfectly fits the data.
      *)
      let calculateDeterminationFromValue (actual:seq<float>) (expected:seq<float>) = 
          let meanY = Seq.mean actual
          let SSE,SST =
              Seq.zip actual expected
  