Scheme中procedure和map的使用

Question

我对 Scheme 很陌生，我正在慢慢找到解决办法。

对Procedures和Map有一些疑惑，希望能得到解答。

(map plus1 (list 1 2 3 4))

基本上会给我返回结果：

(2 3 4 5)

如果该过程将列表作为其唯一参数，那很好。我的问题是我如何才能使用像这样的过程，它需要带有 Map 的 2 个参数？

(define plus(m list)
    (+ m list))

提前感谢您的帮助和建议。

Answer 1

(define (plus m xs)
  (map (lambda (x) (+ m x)) xs))

或

(define (adder m)
  (lambda (x) (+ m x)))

(define plus (m xs)
  (map (adder m) xs))

这允许您将adder 函数也用于其他事情。

Answer 2

可能是这样的？

(define (plus m n) (+ m n))

(map plus (list 1 2 3) (list 4 5 6))

; => (list 5 7 9)

Answer 3

使用两个列表。看看会发生什么：

guile> (map (lambda (x y) (+ x y)) '(1 2 3) '(4 5 6))
(5 7 9)