功能无需传递参数即可工作

时间:2017-02-18 14:43:13

标签: f# f#-interactive

/!\ F#brand newbie /!\

我有这段代码

#r @"..\packages\Accord.3.4.0\lib\net40\Accord.dll"
#r @"..\packages\Accord.Statistics.3.4.0\lib\net40\Accord.Statistics.dll"
#r @"..\packages\Accord.Math.3.4.0\lib\net40\Accord.Math.dll"

open Accord
open Accord.Statistics.Models.Regression.Linear

let input = [|1,1.;2,2.;3,2.25;4,4.75;5,5.|]

let x = input |> Array.map(fun (x,y) -> float x)
let y = input |> Array.map(fun (x,y) -> y) 
let regression = SimpleLinearRegression()

let sse = regression.Regress(x,y)
let intercept = regression.Intercept
let slope = regression.Slope
let mse = sse/float x.Length
let rmse = sqrt mse
let r2 = regression.CoefficientOfDetermination(x,y)

这给了我结果

val input : (int * float) [] = [|(1, 1.0); (2, 2.0); (3, 2.25); (4, 4.75); (5, 5.0)|]
val x : float [] = [|1.0; 2.0; 3.0; 4.0; 5.0|]
val y : float [] = [|1.0; 2.0; 2.25; 4.75; 5.0|]
val regression : SimpleLinearRegression = y(x) = 1,075x + -0,224999999999998
val sse : float = 1.06875
val intercept : float = -0.225
val slope : float = 1.075
val mse : float = 0.21375
val rmse : float = 0.4623310502
val r2 : float = 0.9153465347

SimpleLinearRegression函数如何运作,但我们甚至不通过它xy

你能指点我参考,了解这背后的F#魔法是什么吗?

1 个答案:

答案 0 :(得分:2)

我猜您正在使用F-Sharp Interactive,并将所有代码一次性发送到FSI。

神奇的是首先执行代码,然后写入结果。即使' val'通过这种方式,输出有点直观。

我可以用这个例子来说明(对于未来的读者):

let mutable a = 1
let f = a <- 2; fun () -> 3
do a <- f ()

在FSI中给出了这个输出:

val mutable a : int = 3
val f : (unit -> int)
val it : unit = ()

注意a在打印之前如何更新为最终值(我们甚至看不到1和2,即使分别是第一行和第二行之后a的值)。