小编Kat*_*ten的帖子

我正在学习标准机器学习，我必须做的一个练习是编写一个名为 opPairs 的函数，它接收一个 int 类型的元组列表，并返回一个包含每对总和的列表。例子：

input: opPairs [(1, 2), (3, 4)]
output: val it = [3, 7]

这些是我的尝试，没有编译：

尝试 1

type T0 = int * int;
fun opPairs ((h:TO)::t) = let val aux =(#1 h + #2 h) in
                              aux::(opPairs(t))
                         end;

The error message is:
Error: unbound type constructor: TO
Error: operator and operand don't agree [type mismatch]
  operator domain: {1:'Y; 'Z}
  operand:         [E]
  in expression:
    (fn {1=1,...} => 1) h

尝试 2

fun opPairs2 l = map (fn x …