anchor.diff:                                  Label = chart.Config.Title,
                                   BackgroundColor = (string chart.SeriesConfig.FillColor),
                                   BorderColor = (string chart.SeriesConfig.StrokeColor),
  -                                PointBackgroundColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointColor),
  -                                PointHoverBackgroundColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointHighlightFill),
  -                                PointHoverBorderColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointHighlightStroke),
  -                                PointBorderColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointStrokeColor),
  +                                PointBackgroundColor = Union1Of2(string chart.ColorConfig.PointColor),
  +                                PointHoverBackgroundColor = Union1Of2(string chart.ColorConfig.PointHighlightFill),
  +                                PointHoverBorderColor = Union1Of2(string chart.ColorConfig.PointHighlightStroke),
  +                                PointBorderColor = Union1Of2(string chart.ColorConfig.PointStrokeColor),
                                   Data = (initial |> Array.map snd)) 
                               |])
   
  
positive.code:                                 Label = chart.Config.Title,
                                  BackgroundColor = (string chart.SeriesConfig.FillColor),
                                  BorderColor = (string chart.SeriesConfig.StrokeColor),
                                  PointBackgroundColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointColor),
                                  PointHoverBackgroundColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointHighlightFill),
                                  PointHoverBorderColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointHighlightStroke),
                                  PointBorderColor = Choice<string, string[]>.Choice1Of2(string chart.ColorConfig.PointStrokeColor),
                                  Data = (initials |> Array.map snd)) :> ChartJs.ADataSet
                          )
                          |> Seq.toArray)
  
negative.code:                                 Label = chart.Config.Title,
                                  Fill = false,
                                  BorderColor = (string chart.SeriesConfig.StrokeColor),
                                  PointBackgroundColor = Union1Of2(string chart.ColorConfig.PointColor),
                                  PointHoverBackgroundColor = Union1Of2(string chart.ColorConfig.PointHighlightFill),
                                  PointHoverBorderColor = Union1Of2(string chart.ColorConfig.PointHighlightStroke),
                                  PointBorderColor = Union1Of2(string chart.ColorConfig.PointStrokeColor),
                                  Data = (initial |> Array.map snd)) 
                              |])
  
  