在方案中列出作为参数

Question

假设我有一个过程 foo，它接受三个参数，并返回一个列表，其中所有参数都加倍：

(define  (foo a b c)
  (list (* 2 a ) (* 2 b) (* 2 c)))

我想要做的是创建另一个接受列表的过程，并使用列表元素作为参数调用 foo，像这样：

(define (fooInterface myList)
  ...)

(fooInterface (list 1 2 3))

问题是，我不想编写 fooInterface 假设 foo 总是有 3 个参数。也就是说，如果我向 foo 添加额外的参数，则 fooInterface 应该仍然可以工作，只要传入的列表有 3 个元素。

Answer 1

您要查找的内容称为 apply。

Answer 2

map 怎么样，它可以与不同的过程定义一起使用吗？

(define foo2

(lambda (x)
  (* x 2)))

(map foo2 '(1 2 3 4 5))

Answer 3

一些实现可以做你想做的事...

(define (foo lst)
  (map (lambda (x) (* 2 x)) lst))

(define (foo lst)
  (apply (lambda args (map (lambda (x) (* x 2)) args)) lst))

(define foo
  (lambda args (map (lambda (x) (* x 2)) args))

只是为了好玩，apply 的一个非常酷的用途是转置矩阵。考虑一下：

(define grid     '((1 2 3) 
                   (4 5 6) 
                   (7 8 9)
))

那么，

(apply map list grid)
=> '((1 4 7)
     (2 5 8)
     (3 6 9))