Question

我试图用F＃编写Taylor系列。看看我的代码

let rec iter a b f i = 
    if a > b then i;
    else f a (iter (a+1) b f i) 
let sum a b = iter a b (+) 0  // from 0
// e^x = 1 + x + (x^2)/2 + ... (x^n)/n! + ...
let fact n = iter 1 n (*) 1 // factorial
let pow x n = iter 1 n (fun n acc -> acc * x) 1 
let exp x =
             iter 0 x
                (fun n acc ->
                     acc + (pow x n) / float (fact n)) 0

在最后一行中，我尝试将int fact n转换为浮动，但似乎我错了，因为此代码不可编译:( 我在做正确的算法吗？

我可以先调用我的代码功能吗？

Answer 1

代码无法编译，因为：

您试图将整数pow x n除以浮点数。分部必须具有相同类型的操作数。
您指定了错误类型的终端案例。文字0是整数。如果您想浮点零，请使用0.0或缩写0.

试试这个：

let exp x =
         iter 0 x
            (fun n acc ->
                 acc + float (pow x n) / float (fact n)) 0.

P.S。将来，请提供您获得的确切错误消息和/或意外结果。简单地说“不起作用”并不能很好地描述问题。

泰勒系列通过F＃

1 个答案: