SICP汽车/CDR练习题问题

Question

我在这里尝试 SICP 的“在线导师”：http://icampustutor.csail.mit.edu/6.001-public/tutor.cgi?op=registration-page

我正在查看以下问题：

假设我们已经评估过 表格

(define thing (cons (cons (cons 1 nil) nil)
                    (cons (cons 2 (cons 3 (cons 4 nil)))
                          (cons 2
                               (cons 3 nil))))) Write expressions

仅使用汽车、CDR 以及其 值是给定的列表结构 下面。

(1)
1
(2 3)
(3)

我对最后一项有疑问。我找到了一种使用反引号和取消引号的方法，但在线教程不接受答案。使用小鸡计划的解释器：

#;3> (define nil '())
#;4>  (define thing (cons (cons (cons 1 nil) nil)
--->                         (cons (cons 2 (cons 3 (cons 4 nil)))
--->                               (cons 2
--->                                    (cons 3 nil)))))
#;5> 
#;5> thing
(((1)) (2 3 4) 2 3)

#;25> `(,(car(cdr(car(cdr thing)))))
(3)

还有其他方法可以做到这一点吗？

Answer 1

看来我只是犯傻了。这工作正常：

(cdr(cdr(cdr thing)))