Scheme如何获取列表中的第一项？

Question

说我想要列出第一项 '(4 3 1) '(5 6 8)

我想要这样的东西

(first '(4 3 1) '(5 6 8))

应该给我第一个项目

(4 3 1) 

结果.在我可以调用的方案内置函数中是否有这样的东西？

汽车不起作用,因为它只返回1列表中的第一项

list-ref不起作用,上面同样的原因,在列表中返回1个项目

我怎样才能做到这一点？如果我需要自己写这个第一个功能？

Answer 1

您可以使用该list-ref过程使用其索引从列表中获取元素,例如:

(let ((l '((4 3 1) (5 6 8))))
  (list-ref l 0)) ; get the element at index 0

但是,如果您只想要第一个元素,则可以使用car:

(let ((l '((4 3 1) (5 6 8))))
  (car l))

检查此处运行的代码段.