如何从F#Seq获取成对的连续值

问题描述

我有一个{"1";"a";"2";"b";"3";"c";...}序列.

如何将该序列转换为{("1","a");("2","b");("3","c");...}

推荐答案

这是一个非常聪明的解决方案:

Here is a much-too-clever solution:

let s = ["1";"a";"2";"b";"3";"c"]

let pairs s =
    s |> Seq.pairwise 
      |> Seq.mapi (fun i x -> i%2=0, x) 
      |> Seq.filter fst 
      |> Seq.map snd

printfn "%A" (pairs s)

这篇关于如何从F#Seq获取成对的连续值的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！