#r "nuget: Plotly.NET, 5.0.0"
#r "nuget: Plotly.NET.Interactive, 5.0.0"


open Plotly.NET

// a coordinates
let a = [ 1; 2; 3; 4; 5; 6; 7 ]

// b coordinates
let b = a |> List.rev

//c
let c = [ 2; 2; 2; 2; 2; 2; 2 ]


let combinedTernary =
    [ Chart.PointTernary(A = a, B = b, C = c)
      Chart.LineTernary(A = a, C = c, Sum = 10) ]

    |> Chart.combine


combinedTernary


open Plotly.NET.LayoutObjects

let styledTernary =
    combinedTernary
    |> Chart.withTernary (
        Ternary.init (
            AAxis = LinearAxis.init (Title = Title.init ("A"), Color = Color.fromKeyword ColorKeyword.DarkOrchid),
            BAxis = LinearAxis.init (Title = Title.init ("B"), Color = Color.fromKeyword ColorKeyword.DarkRed)
        )
    )


styledTernary


let styledTernary2 =
    styledTernary
    |> Chart.withCAxis (LinearAxis.init (Title = Title.init ("C"), Color = Color.fromKeyword ColorKeyword.DarkCyan))


styledTernary2