Common Lisp将list中的关联作为新列表返回

Question

我有一个如下的assoc列表：

(defparameter *experts2*
  `(
    ;; direction
    (:direction . ( (nn-direction-expert (process-signal) :number-of-neighbors 10)
                    (fn-direction-expert (process-signal) :number-of-neighbors 10) ))



    ;; evaluation
    (:evaluation . ( 

                    ;(avoid-line-crossing-evaluation-expert (process-signal))
                    (nn-single-evaluation-expert (candidate-point))
                    (fn-single-evaluation-expert (candidate-point))
                    ;(nn-all-evaluation-expert (ranking))
                    ))

    ;; coordination
    (:coordination . (
                      ;(ranking-process (candidate-point))
                      (action-process (candidate-point ranking))))))

我正在寻找一种方法，从key=>value列表中提取值并将它们放入一个新的列表中，如下所示

(defparameter *experts*
  `(
    ;; direction
    (nn-direction-expert (process-signal) :number-of-neighbors 10)
    (fn-direction-expert (process-signal) :number-of-neighbors 10)

    ;eher als evaluationsexperte
    ;(avoid-line-crossing-evaluation-expert (process-signal) )

    ;; evaluation
    (nn-single-evaluation-expert (candidate-point))
    (fn-single-evaluation-expert (candidate-point))
    ;(nn-all-evaluation-expert (ranking))

    ;; coordination
    ;(ranking-process (candidate-point))
    (action-process (candidate-point ranking))
    ))

有什么建议吗？谢谢你的帮助。

问候

Answer 1

这似乎产生了你想要的答案，但它看起来并不是很漂亮：

(mapcan #'copy-list (mapcar #'cdr *experts2*))

Answer 2

塞缪尔·埃德温·沃德的答案是有效的，但这里有另一个答案(现在进行编辑，以实际执行您需要的操作)。因此，对于*experts2*的每个元素，您需要获取其cdr，然后从返回的列表中获取值，并将它们组合到一个列表中：

(apply #'append (mapcan #'cdr *experts2*))