AsyncUpdateWebsharper.fs

let tempDiv = div []
let onAfterRender = on.afterRender (fun _ -> 
    async {
        do! Async.Sleep(5000)
        let! data = Server.getMonthAndPricesGroupedDbAsync ()
        let barChart = Chart.Bar data
        let render = Renderers.ChartJs.Render(barChart, Size = Size(500, 500))
        tempDiv.Prepend render
    } |> Async.Start
)

divAttr [ attr.``class`` "col-md-4 col-md-offset-4"; onAfterRender] [tempDiv]