리스트 순서, CAR과 CDR조합

Auto CAD/lisp|2026. 2. 11. 17:51

(setq x  '((A B) (C D) (E F) (G H))
car - (A B)
cadr - (C D)
caddr - (E F)
cadddr - (G H)

 

- 빨강색 부분 삭제하여 단축 

CDR  CAR, CADR 조합 (2개까지)

(car (car x))            >>  (caar x) -  A

(cadr (car x))          >>  (cadar x) - B

 

CAR과 CDR조합 (4개이하)

(car  (cdr (car x)))  >>  (cadar x) - B

(car  (car  (cdr x))  >> (caadr x) - C

(car  (cdr  (car  (cdr x))  >> (cadadr x) -  D

 

(car (cdr x))  >>  (cadr x) -   (C D)
(cdr (car x))  >>  (cdar x) -  (B)
(cdr (cdr x))  >>  (cddr x) -   (D)


(car (car (car x)))  >>  (caaar x) 
(car (car (cdr x)))  >>  (caadr x)
(car (cdr (car x)))  >>  (cadar x) 

 

(car (cdr (cdr x)))  >>  (caddr x) 
(cdr (car (car x))) >>   (cdaar x)
(cdr (car (cdr x))) >>   (cdadr x)
(cdr (cdr (car x))) >>  (cddar x) 
(cdr (cdr (cdr x))) >>  (cdddr x) 

 

(car (car (car (car x))))  >>   (caaaar x) 
(car (car (car (cdr x))))  >>   (caaadr x) 
(car (car (cdr (car x))))  >>  (caadar x) 
(car (car (cdr (cdr x))))  >>  (caaddr x) 
(car (cdr (car (car x))))  >>  (cadaar x) 
(car (cdr (car (cdr x))))  >>  (cadadr x) 
(car (cdr (cdr (car x))))  >>  (caddar x) 
(car (cdr (cdr (cdr x))))  >>  (cadddr x) 
(cdr (car (car (car x))))  >> (cdaaar x) 
(cdr (car (car (cdr x)))) >>  (cdaadr x) 
(cdr (car (cdr (car x)))) >> (cdadar x) 
(cdr (car (cdr (cdr x)))) >> (cdaddr x) 
(cdr (cdr (car (car x)))) >> (cddaar x) 
(cdr (cdr (car (cdr x)))) >> (cddadr x) 
(cdr (cdr (cdr (car x)))) >> (cdddar x) 
(cdr (cdr (cdr (cdr x)))) >> (cddddr x) 

'Auto CAD > lisp' 카테고리의 다른 글

excel saveas  (0) 2023.09.06
AutoCAD 2012의 새로운 AutoLISP 기능 (Mac용)  (0) 2023.07.06
ssget  (0) 2021.03.20
Error Message Troubleshooter  (0) 2021.02.20
Building Association Lists: A Simple Block Counter  (0) 2021.02.20

댓글()