Merge pull request #267 from plotly/#266-title-alignment

Author: kMutagene

src/Plotly.NET/ChartAPI/Chart.fs

@@ -1672,6 +1672,12 @@ type Chart =
 
             GenericChart.addLayout layout ch)
 
+    // Set the title of a Chart
+    [<CompiledName("WithTitle")>]
+    static member withTitle(title) =
+        (fun (ch: GenericChart) ->
+            let layout = Layout() |> Layout.style (Title = title)
+            GenericChart.addLayout layout ch)
 
     // Set showLegend of a Chart
     [<CompiledName("WithLegend")>]

src/Plotly.NET/CommonAbstractions/StyleParams.fs

@@ -2636,13 +2636,15 @@ module StyleParam =
     [<RequireQualifiedAccess>]
     type Side =
         | Top
+        | TopLeft
         | Bottom
         | Left
         | Right
 
         static member toString =
             function
             | Top -> "top"
+            | TopLeft -> "top left"
             | Bottom -> "bottom"
             | Left -> "left"
             | Right -> "right"

src/Plotly.NET/CommonAbstractions/Title.fs

@@ -32,7 +32,7 @@ type Title() =
             Text |> DynObj.setValueOpt title "text"
             Font |> DynObj.setValueOpt title "font"
             Standoff |> DynObj.setValueOpt title "standoff"
-            Side |> DynObj.setValueOpt title "side"
+            Side |> DynObj.setValueOptBy title "side" StyleParam.Side.convert
             X |> DynObj.setValueOpt title "x"
             Y |> DynObj.setValueOpt title "y"