为什么Seq.iter和Seq.map如此之慢？

Question

考虑这个代码在F＃：

let n = 10000000 
let arr = Array.init n (fun _ -> 0) 

let rec buildList n acc i = if i = n then acc else buildList n (0::acc) (i + 1) 
let lst = buildList n [] 0 

let doNothing _ =() 
let incr x = x + 1 

#time 

arr |> Array.iter doNothing   // this takes 14ms 
arr |> Seq.iter doNothing   // this takes 74ms 

lst |> List.iter doNothing   // this takes 19ms 
lst |> Seq.iter doNothing   // this takes 88ms 

arr |> Array.map incr    // this takes 33ms 
arr |> Seq.map incr |> Seq.toArray // this takes 231ms! 

lst |> List.map incr    // this takes 753ms 
lst |> Seq.map incr |> Seq.toList // this takes 2111ms!!!! 

为什么Seq模块上的iter和map功能比Array和List模块等同这么多慢？

Answer 1

一旦您拨打Seq，您将丢失类型信息 - 移至列表中的下一个元素需要致电IEnumerator.MoveNext。与Array相比，您只需增加一个索引，而对于List，则只需取消引用一个指针即可。实质上，您将获得列表中每个元素的额外函数调用。

的转换回List和Array也慢了下来代码出于类似的原因