在Scheme / Racket中为每个列表（在列表中）添加元素？

Question

我刚刚开始学习函数式编程，并且需要帮助我认为非常简单，但无法弄清楚（过了漫长的一天）。

基本上我在一个更大的列表中有多个列表（每个都有整数）。我想为每个列表添加一个元素。到目前为止我有什么，但无法完成...

(define (number-adder lstInlst x)
     (map append x somehow??? lstInlst))

感谢任何帮助！

Answer 1

(map (lambda (lst)
       (cons x lst))
     list-of-lists)

由于您正在使用Racket，因此您可以使用curry来缩短更短的内容：

(map (curry cons x) list-of-lists)