f# - F# 库是否有 `argMax` 的标准函数？

Question

我是 F# 的新手，正在编写一些简单的算法来习惯这种语言，这需要argMax. 标准库是否带有用于搜索最大化功能的列表元素的功能？也就是说，如果有一个行为像这样的现有函数：

let argMax f xs =
  let rec go a fa zs =
    match zs with
      | [] -> a
      | z :: zs' ->
        let fz = f z
        if fz > fa
        then go z fz zs'
        else go a fa zs'
  match xs with
    | []       -> invalidArg "xs" "empty"
    | x :: xs' -> go x (f x) xs'

Answer 1

是的，但它被称为List.maxBy.

这是一个例子：

let f x = -(x * x) + 100 * x + 1000
List.maxBy f [0..1000]
// val it : int = 50

f 50
// val it : int = 3500

和也有和List.minBy相同的功能。SeqArray