구성표 목록의 첫 번째 항목을 가져 오는 방법?

Question

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

나는이

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

같은 것이 결과로 나에게 첫 번째 항목

(4 3 1) 

를 반환해야합니다 나는이 목록의 첫 번째 항목을하고 싶은 말은. 제가 호출 할 수있는 스키마 빌트인 함수에 이와 같은 것이 있습니까? 그것은 단지

목록-REF 작동하지 않는 일 개 목록, 위 같은 이유로 내부 나에게 첫 번째 항목을 반환로

차 목록

어떻게 내부 나에게 한 항목을 반환 작동하지 않습니다 내가 그랬어? 이 첫 번째 기능을 스스로 작성해야한다면?

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)) 

확인 조각은 here를 실행.

Answer 2

은 내가 기법을 사용하기 때문에 오랜만이야,하지만 당신은

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

Answer 3

당신은 너무 열심히 노력하고 먼저 자신의 목록에있는 목록이 필요하지 않을 :

> (define (first a b) a)  
> (first '(1 2 3) '(4 5 6)) 
(1 2 3) 

Answer 4

"." 함수 정의에서 임의의 수의 인수를 취합니다.

(define (first . args) (car args)) 
(first '(4 3 1) '(5 6 8)) ;; => (4 3 1)