从文本文件中读取并排序

我设法读取了包含逐行随机数的文本文件.当我使用printfn "%A" linesI得到输出seq ["45"; "5435" "34"; ... ]行时,我假设行必须是数据类型列表.

open System
let readLines filePath = System.IO.File.ReadLines(filePath);;
let lines = readLines @"C:\Users\Dan\Desktop\unsorted.txt"

我现在尝试按最低到最高排序列表,但它没有.sortBy()方法.任何人都可以告诉我如何手动执行此操作？我已经尝试将其转换为数组以对其进行排序但它不起作用.

let array = [||]
let counter = 0
for i in lines do
 array.[counter] = i
 counter +1
Console.ReadKey <| ignore

提前致谢.

如果所有行都是整数,您可以使用Seq.sortBy int,如下所示:

open System
let readLines filePath = System.IO.File.ReadLines(filePath)
let lines = readLines @"C:\Users\Dan\Desktop\unsorted.txt"
let sorted = lines |> Seq.sortBy int

如果某些行可能不是有效整数,那么您需要运行解析和验证步骤.例如:

let tryParseInt s =
    match System.Int32.TryParse s with
    | true, n -> Some n
    | false, _ -> None
let readLines filePath = System.IO.File.ReadLines(filePath)
let lines = readLines @"C:\Users\Dan\Desktop\unsorted.txt"
let sorted = lines |> Seq.choose tryParseInt |> Seq.sort

请注意,tryParseInt我刚写的函数是返回int值,所以我使用Seq.sort而不是Seq.sortBy int,并且该函数链的输出将是一个int序列而不是一串字符串.如果你真的想要一个字符串序列,但只有可以解析为int的字符串,你可以这样做:

let tryParseInt s =
    match System.Int32.TryParse s with
    | true, _ -> Some s
    | false, _ -> None
let readLines filePath = System.IO.File.ReadLines(filePath)
let lines = readLines @"C:\Users\Dan\Desktop\unsorted.txt"
let sorted = lines |> Seq.choose tryParseInt |> Seq.sortBy int

请注意我是如何s从这个版本返回的tryParseInt,这样就Seq.choose可以保留字符串(但丢掉任何无法验证的字符串System.Int32.TryParse).有更多的可能性,但这应该足以让你开始.