Add obsolete tags fore Range Charts to ensure backwards compatibility

Author: kMutagene

src/FSharp.Plotly/Chart.fs

@@ -134,6 +134,51 @@ type Chart =
     static member Bubble(xysizes,?Name,?Showlegend,?MarkerSymbol,?Color,?Opacity,?Labels,?TextPosition,?TextFont) = 
         let x,y,sizes = Seq.unzip3 xysizes 
         Chart.Bubble(x, y,sizes=sizes,?Name=Name,?Showlegend=Showlegend,?MarkerSymbol=MarkerSymbol,?Color=Color,?Opacity=Opacity,?Labels=Labels,?TextPosition=TextPosition,?TextFont=TextFont)
+    
+    
+    /// Displays a range of data by plotting two Y values per data point, with each Y value being drawn as a line 
+    [<Obsolete("Use the constructors with the mandatory mode argument for full functionality")>]
+    static member Range(x, y, upper, lower,?Name,?ShowMarkers,?Showlegend,?Color,?RangeColor,?Labels,?TextPosition,?TextFont) =             
+        // if text position or font is set than show labels (not only when hovering)
+        let changeMode = 
+            let isShowMarker =
+                match ShowMarkers with
+                | Some isShow -> isShow
+                | Option.None        -> false
+            StyleParam.ModeUtils.showText (TextPosition.IsSome || TextFont.IsSome)                       
+                >> StyleParam.ModeUtils.showMarker (isShowMarker)
+
+
+        let trace = 
+            Trace.initScatter (
+                    TraceStyle.Scatter(X = x,Y = y, Mode=changeMode StyleParam.Markers, ?Fillcolor=Color) )               
+            |> TraceStyle.TraceInfo(?Name=Name,?Showlegend=Showlegend)
+            |> TraceStyle.Line(?Color=Color)
+            |> TraceStyle.Marker(?Color=Color)
+            |> TraceStyle.TextLabel(?Text=Labels,?Textposition=TextPosition,?Textfont=TextFont)
+
+        let lower = 
+            Trace.initScatter (
+                    TraceStyle.Scatter(X = x,Y = lower, Mode=StyleParam.Lines, ?Fillcolor=RangeColor) )               
+            |> TraceStyle.TraceInfo(Showlegend=false)
+            |> TraceStyle.Line(Width=0)
+            |> TraceStyle.Marker(Color=if RangeColor.IsSome then RangeColor.Value else "rgba(0,0,,0.5)")             
+
+        let upper = 
+            Trace.initScatter (
+                    TraceStyle.Scatter(X = x,Y = upper, Mode=StyleParam.Lines, ?Fillcolor=RangeColor, Fill=StyleParam.ToNext_y) )               
+            |> TraceStyle.TraceInfo(Showlegend=false)
+            |> TraceStyle.Line(Width=0)
+            |> TraceStyle.Marker(Color=if RangeColor.IsSome then RangeColor.Value else "rgba(0,0,,0.5)")             
+ 
+        GenericChart.MultiChart ([lower;upper;trace],Layout(),Config())
+
+    [<Obsolete("Use the constructors with the mandatory mode argument for full functionality")>]
+    /// Displays a range of data by plotting two Y values per data point, with each Y value being drawn as a line 
+    static member Range(xy, upper, lower,?Name,?ShowMarkers,?Showlegend,?Color,?RangeColor,?Labels,?TextPosition,?TextFont) =   
+        let x,y = Seq.unzip xy
+        Chart.Range(x, y, upper, lower, ?Name=Name,?ShowMarkers=ShowMarkers,?Showlegend=Showlegend,?Color=Color,?RangeColor=RangeColor,?Labels=Labels,?TextPosition=TextPosition,?TextFont=TextFont)
+
 
 
     /// Displays a range of data by plotting two Y values per data point, with each Y value being drawn as a line