anchor.diff:  open Accord.Statistics.Models.Regression.Fitting
   
   #time
  -let trainItems = PrepareData.getTrainItems (PrepareData.Random 0.01)
  +let trainItems = 
  +    PrepareData.getTrainItems (PrepareData.Random 0.05)
  +    |> Seq.filter(fun i -> i.AdjustedDemand < 20) 
   
   let startWeek = 
       trainItems 
  
positive.code: 
  let rmsle =
      Array.zip predicted testOutput
      |> Array.map(fun (f,s) -> {Simula ted=f;Observed=s})
      |> RMSLE
     
  //val rmsle : float = 1.23417018
negative.code: 
  let input = 
      trainItems 
      |> Seq.map(fun i -> createArray i.WeekNumber |> Array.append [|i.SalesDepotId; i.SalesChannelId; i.SalesRouteId; i.ClientId; i.ProductId |])
      |> Seq.map(fun a -> a |> Array.map float) 
      |> Seq.toArray
  
  