内部编号列表-方案

Question

我需要建立一个像这样的列表： (list (list 1 2) (list 3 4) (list 5 6))，但以下代码中有错误：

(define example
  (lambda (a b)
    (let ((tmp (+ b 1)))
    (list '(1 b) '(2 tmp) '(3 3)))))

(example 1 4)

我想要的结果是(list (list 1 4) (list 3 5) (list 3 3))，但我得到的结果是：(list (list 1 'b) (list 2 'tmp) (list 3 3))。

Answer 1

您需要做

(list (list 1 b) (list 2 tmp) '(3 3))

或

(list `(1 ,b) `(2 ,tmp) '(3 3))