在尝试生成存在于两个集合中的子集列表时，我遇到了 cons 的问题。一个过程接收一个名为 result 的列表，并尝试从 result 和另一个集合的 car 中构造一个新列表。到目前为止，该集合是使用正确的元素生成的，但它们包含在大小 N 嵌套列表中，其中 N 是嵌套数和我正在搜索的子集中的元素数.
如何在不创建嵌套列表的情况下应用 cons 和 result？
例子：
;These are two sets that I will be checking
(define s1 '(1 2 3 4))
(define s2 '(1 2 3))
;Result from running these lists through my procedure
(((() . 1) . 2) . 3)
;What I want to have generated
(1 2 3)
我需要能够拨打 (car list) 并接收1 而不是((() . 1) . 2)
【问题讨论】：
首先(((() . 1) . 2) . 3) 不是一个嵌套列表——它根本不是一个列表。 (((() 1) 2) 3) 将是一个嵌套列表。 (((() . 1) . 2) . 3) 是一个点对，它的第一个元素也是一个点对。
所以现在解释一下你看到的行为：在 lisp 语言家族中，(cons a b) 创建了一个包含 a 的对，因为它是 car 和 b 作为它的 cdr。
现在列表要么是空列表 (())，要么是其 cdr 也是列表的一对（car 可能包含任何内容 - 如果 cdr 和 car 都是列表，该列表称为嵌套列表）。
不是列表的对称为点对。这是您在此处创建的内容，因为您使用第二个参数而不是列表调用 cons。
您不能使用cons 追加到列表的末尾。如果您需要追加到列表的末尾，您可以使用 concat 和单元素列表作为第二个参数。
但是请注意，附加到列表末尾是一个O(n) 操作，而在前面附加（使用cons）是一个O(1) 操作，所以如果可能的话你应该改变你的算法，所以它只需要附加在前面。
【讨论】：
'()结尾，意味着一个包含三个子列表的列表里面有4个空列表。