anchor.diff:              /// Regression through the origin (y : x -> bx)
               module RTO =
               
  -                /// Caclualtes the coefficients for linear regression through the origin 
  +                /// Calculates the coefficients for linear regression through the origin 
                   let coefficientOfVector (x : Vector<float>) (y : Vector<float>) =
                       if x.Length <> y.Length then
                           raise (System.ArgumentException("vector x and y have to be the same size!"))
  
positive.code:                     let denominator = x |> Seq.sumBy (fun x -> x * x)
                      numerator / denominator
  
                  /// Caclualtes the coefficients for linear regression through the origin 
                  let coefficient (x : float list) (y : float list) =
                      coefficientOfVector (vector x) (vector y)
                  
  
negative.code:                                                 )
  
              module Multivariable =           
                  /// Calculates the coefficients for linear regression
                  /// in the form of [|intercept; slope;|]
                  let coefficients (x_data : Matrix<float>) (y_data : Vector<float>) =
                      if x_data.NumRows <> y_data.Length then
  