DisplayMultiplePlotlyCharts.fsx

#r "nuget: Feliz.ViewEngine"
#r "nuget: Plotly.NET"

open Feliz.ViewEngine
open System 
open System.Diagnostics
open System.IO
open Plotly.NET


let displayCharts charts = 

    let build charts = 
        Html.html [
            Html.head [ Html.title "Charts" ]
            Html.body [
                for c in (charts|> Seq.rev) do 
                    prop.dangerouslySetInnerHTML (c |> GenericChart.toEmbeddedHTML)
                ]
            ]
    
    let document = Render.htmlDocument (build charts)
    let fileName = sprintf "%s%s%s" (Path.GetTempPath()) (Guid.NewGuid().ToString()) ".html"
    File.WriteAllText(fileName, document)
    let  psi = new ProcessStartInfo(UseShellExecute = true,  FileName = fileName)
    let p = new Process(StartInfo = psi)
    p.Start()