如何在F#中对序列值进行分组

open System

// 定义学生类型
type Student = {
    Name: string
    Age: int
}

// 创建一个包含学生信息的序列
let students = seq {
    yield { Name = "Alice"; Age = 20 }
    yield { Name = "Bob"; Age = 22 }
    yield { Name = "Charlie"; Age = 20 }
    yield { Name = "David"; Age = 22 }
}

// 根据年龄对学生进行分组
let groupedByAge = students |> Seq.groupBy (fun student -> student.Age)

// 打印分组结果
for age, group in groupedByAge do
    printfn "Age %d:" age
    for student in group do
        printfn "  %s" student.Name

Age 20:
  Alice
  Charlie
Age 22:
  Bob
  David