访问球拍/方案中的特定列表部件

Question

我在弄清楚如何在球拍中访问特定对信息时遇到麻烦。

说我得到一些这样的清单：

(define database-of-components
'((p1 200 (2 p2) (3 p3))
(p2 8 (2 p4))
(p3 60 (1 p5) (2 p6) (3 p7))
(p4 2)
(p5 2)
...
))

如何访问单个pn包含的数据？ 假设我正试图从p1获得200或从p3获得60 ...我该怎么做？

注意：这显然是用于家庭作业，但是这个问题只是入门。

Answer 1

查找assq和朋友（ assoc ， assv ）：

> (assq 'p1 database-of-components)
'(p1 200 (2 p2) (3 p3))
> (second (assq 'p1 database-of-components))
200
> (second (assq 'p3 database-of-components))
60