在 F# 中反转数组

问题描述

有没有其他方法可以在不使用 array.rev 函数和不复制原始数组的情况下在 F# 中反转数组，可能类似于反转列表的方式。

let rev (lst : List<'T>) =
  let length = List.length lst
  seq { for i in (length-1) .. -1 .. 0 do yield lst.[i] }
  |> Seq.toList

解决方法

如果不想创建新数组，唯一的选择就是改变原数组的元素。就地更改它们。

要反转，只需将第一个元素与最后一个元素交换，第二个元素与倒数第二个元素交换，依此类推：

let rev arr =
    let len = Array.length arr
    for i in 0..(len/2 - 1) do
        let x = arr.[i]
        arr.[i] <- arr.[len-i-1]
        arr.[len-i-1] <- x
    arr