`open System
open Plotly.NET
open FSharp.Data
type DFI = CsvProvider<"https://raw.githubusercontent.com/plotly/datasets/master/streamtube-wind.csv">
let df1 = DFI.Load(" ")
let x=[for row in df1.Rows do row.X]
let y=[for row in df1.Rows do row.Y]
let z=[for row in df1.Rows do row.Z]
let u=[for row in df1.Rows do row.U]
let v=[for row in df1.Rows do row.V]
let w=[for row in df1.Rows do row.W]
let margin =Margin.init(Left =20.0, Bottom=20.0,Top =20.0, Right = 20.0 )
let layout = Layout.init( Margin=margin)
let streamtube3d =
Trace3d.initStreamTube (fun streamtube3d ->
streamtube3d?x <- x
streamtube3d?y <-y
streamtube3d?z <-z
streamtube3d?u <- u
streamtube3d?v <-v
streamtube3d?w <-w
streamtube3d?sizeref <- 0.3
streamtube3d?colorscale <- "Portland"
streamtube3d?showscale <- false
streamtube3d?maxdisplayed <- 3000
streamtube3d
)
|> GenericChart.ofTraceObject
|> Chart.withLayout layout
`
