diff --git a/build.fsx b/build.fsx index 5df340a..1d04247 100644 --- a/build.fsx +++ b/build.fsx @@ -258,8 +258,7 @@ Target.create DotNet.exec id "fsdocs" - ("build --clean --eval --properties Configuration=Release --parameters fsdocs-package-version " - + release.NugetVersion) + "build --clean true --eval" |> ignore) // -------------------------------------------------------------------------------------- diff --git a/docs/sample.fsx b/docs/sample.fsx deleted file mode 100644 index b4710db..0000000 --- a/docs/sample.fsx +++ /dev/null @@ -1,54 +0,0 @@ -#r "nuget: RProvider, 0.0.1-local" - -open RProvider -open RProvider.terra -open RProvider.broom - -/// Metres above sea level -[] type masl - -fsi.AddPrinter FSIPrinters.rValue - -/// Load Arctic DEM for Bear Island. -let loadDem () = - let dem = R.rast "/Users/andrewmartin/Tresors/Research Projects/Bear Island/bear-island-arcticdem.tif" - let coords = R.crds dem - let mat = R.as_matrix dem - let matF = - mat.FromR() - |> Array2D.map ((*) 1.) - - // let coordsF = coords.GetValue() - // coordsF - // |> Array2D.map - matF - - mat.Print() - - - dem |> RExpr.slots - - - -open RProvider.stats - -let x = - [| 1 .. 10 |] - |> Array.Parallel.map(fun i -> - (R.sin i).FromR() - ) - -let y = - [| 1 .. 10 |] - |> Array.map(fun i -> - (R.sin i).FromR() - ) - - -// this works -let x2 = [| 0..10 |] |> Array.map (fun i -> R.sin(i).Print()) - -// this fails -let y2 = [| 0..10 |] |> Array.Parallel.map (fun i -> R.sin(i).Print() ) - -R.t_test() \ No newline at end of file