`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