F＃根据Sequence的先前值计算函数

Question

我想获得包含计算值的新seq（x _i -x _i-1 ）/ x _i-1 。如果没有声明怎么办？

let GAZP = seq  [ 183.24; 170.15;174.17;170.67;170.15;171.2;172.56;178.1;191.5;190.5;175.1]

let gazpReturnRate =
    GAZP
    |> Seq.skip 1
    |> Seq.map(fun x -> x)

printf "%A" gazpReturnRate

Answer 1

使用Seq.pairwise。它创建了所有连续对的序列：

GAZP
|> Seq.pairwise
|> Seq.map (fun (xn_1, xn) -> (xn - xn_1) / xn_1)