lambda - 列表的最小索引 i，使得从 0 到 i 的数组元素的前缀和小于 F# 中的某个常量 c

Question

假设列表由正数组成。

我可以进行部分求和，用 {0..n} 对其进行压缩，然后运行一些东西，但感觉很笨拙且非延迟评估。

递归 lambda 可能会工作得更好，但我不确定递归 lambda 是否可能，我觉得必须有非常干净的解决方案。

示例:

list [2;2;3;4;5]
c = 5
partial sums [2;4;7;11;16] => return 1(because a[1] = 4 <= c < a[2] = 7)

Answer 1

你需要像 haskell 中的 scanl 和 takeWhile 这样的东西。然后你可以这样做:

let sums = takeWhile (<c) (scanl (+) 0 original)
in length sums - 1