8. List 함수

 

1. LIST

    (1) 기능

      숫자 또는 문자열을 나열하여 하나의 리스트를 만드는 함수

    (2) 사용법

      (LIST  Expression ……)

    (3) 예

       (setq a (list 25 1999))

      : !a      (25 1999)

       (setq a (list 1 2 3 4 5 6))

      : !a      (1 2 3 4 5 6)

       (seta a (list "1 2 3 4 5 6"))

      : !a      ("1 2 3 4 5")

       (setq a (list "1" "2" "3" "4" "5"))

      : !a      ("1" "2" "3" "4" "5")

       (setq Num1 5 Num2 10 Num3 15)

       

       (setq Num4 20)

       

       (setq NList (list Num1 Num2 Num3 Num4))

      : !NList  (5 10 15 20)

 

 

2. NTH

    (1) 기능

      지정 List의 요소중 n번째 위치하고 있는 요소를 선택하는 함수

      만약 n이 0인 경우에는 첫 번째 요소를 받아들인다.

    (2) 사용법

      (NTH n list-name)

    (3) 예

       (setq a (list 3 4 5 6 7 8 9 10))

       

       (setq b (nth 0 a))

      : !b      3

       (setq b (nth 3 a))

      : !b      6

       (setq b (nth 7 a))

      : !b     10

       (setq b (nth 1 a))

      : !b      4

     

 

3. CAR(Contens of the Address Register)

    (1) 기능

      List 목록의 첫번째 요소를 분리하여 받아들인다.

    (2) 사용법

      (CAR (list))

    (3) 예

       (setq a (list 1 2 3))

       

       (setq b (list a 4 5 6))

      : !b      ((123) 4 5 6)

       (setq c (car b))

      : !c      (123)

       (setq a (list 1 2 3 4 5 6))

       

       (setq b (car a))

      : !b      1

 

 

4. CADR

    (1) 기능

      List 목록에서 두 번째 요소를 분리하여 받아들인다.

    (2) 사용법

      (CADR (list))

    (3) 예

       (setq a (list 1 2 3 4 5 6))

      : !a         (1 2 3 4 5 6)

       (setq b (cadr a))

      : !b         2

       (setq b (list a 7 8 9 10))

      : !b         ((1 2 3 4 5 6) 7 8 9 10)

       (setq c (cadr b))

      : !c         7

 

    (4) list와 car과 cadr을 사용한 예제 프로그램

       

       (setq xy01 (list 100 100))

       (setq xy03 (list 200 200))

       (setq xy02 (list (car xy01) (cadr xy03)))

       (setq xy04 (list (car xy03) (cadr xy01)))

       

      2개의 좌표로 4개의 사각형 좌표를 만든다.


      Command: !xy01
      (100 100)

      Command: !xy02
      (100 200)

      Command: !xy03
      (200 200)

      Command: !xy04
      (200 100)

        

 

5. CADDR

    (1) 기능

      List 목록에서 세 번째 요소를 분리하여 받아들인다.

    (2) 사용법

      (CADDR (list))

    (3) 예

       (setq a (list 1 2 3 4 5 6))

      : !a         (1 2 3 4 5 6)

       (setq b (caddr a))

      : !b         3

       (setq b (list 7 8 a))

      : !b         (7 8 (1 2 3 4 5 6))

       (setq c (caddr b))

      : !c         (1 2 3 4 5 6)

 ** 참고

 좌표점을 표현할 때 X좌표값은 CAR 함수, Y좌표값은 CADR 함수, Z좌표값은 CADDR 함수로 얻을 수 있다.

 

 

6. CDR (Contents of the Decrement Register)

    (1) 기능

      List의 두 번째 이후 요소를 받아들인다.

    (2) 사용법

      (CDR (List))

    (3) 예

       (setq a (list 1 2 3))

       

       (setq b (list 4 5 6 a))

      : !b       (4 5 6 (1 2 3))

       (setq c (cdr b))

      : !c       (5 6 (1 2 3))

       (setq b (list a 4 5 6))

      : !b       ((1 2 3) 4 5 6)

       (setq c (cdr b))

      : !c       (4 5 6)

       (setq a (list 1 2 3 4 5))

       

       (setq b (cdr a))

      : !b       (2 3 4 5 6)

     

     

7. LAST

    (1) 기능

      List의 마지막 요소를 받아들인다.

    (2) 사용법

      (LAST (List))

    (3) 예

       (setq a (list 1 2 3))

       

       (setq b (last a))

      : !b       3

       (setq b (list 4 5 6 a))

      : !b       (4 5 6 (1 2 3))

       (setq c (last b))

      : !c       (1 2 3)

       (setq b (list 4 5 6))

       

       (setq c (list a b))

      : !c       ((1 2 3) (4 5 6))

       (setq d (last c))

      : !d       (4 5 6)

 

 

8. Length

    (1) 기능

      List의 Atom의 개수를 알아 낸다.

    (2) 사용법

      (Length (List))

    (3) 예

       (setq a (list 1 2 3 4 5 6))

       

       (setq b (length a))

      : !b       6

       (setq c (list a 7 8 9 10))

      : !c       ((1 2 3 4 5 6) 7 8 9 10)

       (setq d (length c))

      : !d       5

       

       

9. REVERSE

    (1) 기능

      지정 List의 요소를 뒤바꿈 시키는 함수

    (2) 사용법

      (REVERSE list)

    (3) 예

       (setq a (list 1 2 3 4 5 6))

       

       (setq b (reverse a))

      : !b       (6 5 4 3 2 1)

       (setq c (list a 7 8 9 10))

      : !c       ((1 2 3 4 5 6) 7 8 9 10)

       (setq d (reverse c))

      : !d       (10 9 8 7 (1 2 3 4 5 6))

 

 

10. MEMBER

    (1) 기능

      지정 List의 요소 중 지정 요소의 첫번째 요소부터 나머지를 선택

    (2) 사용법

      (MEMBER expr list)

    (3) 예

       (setq a (list 1 2 3 4 5 6))

       

       (setq b (member 3 a))

      : !b       (3 4 5 6)

       (setq c (list "7" "8" "9" "10"))

      : !c       ("7" "8" "9" "10")

       (setq d (member "9" c))

      : !d       ("9" "10")

 

 

11. ASSOC (ASSOCiate)

    (1) 기능

      지정 요소 중에서 선행지정된 변수가 지니고 있는 데이타를 산출하는 함수

    (2) 사용법

      (ASSOC <item> <list>)

    (3) 예

 

 

12. SUBST (SUBSTitute)

    (1) 기능

      기존의 데이타를 새로운 데이타로 치환시키는 함수

    (2) 사용법

      (SUBST <new item> <old item> <list>)

    (3) 예

 

 

13. CONS (CONStant)

    (1) 기능

      지정 List내에 지정 Item의 첫 요소를 함께 포함시키는 함수

    (2) 사용법

      (CONS <item> <list>)

    (3) 예

 

 

14. APPEND

    (1) 기능

      여러가지의 List의 구조를 하나의 List로 혼합시키는 함수

    (2) 사용법

      (APPEND  list-1  list-2 ....)

    (3) 예

 

 

15. APPLY

    (1) 기능

      지정 List를 원하는 함수를 적용시켜 값을 구하는 함수

    (2) 사용법

      (APPLY <function> <list>)

    (3) 예

 

 

16. FOREACH

    (1) 기능

      지정 List의 요소를 하나하나씩 <val> 에 대치하여 <expr> 을 각각 처리하는 함수

    (2) 사용법

      (FOREACH <val> <list> <expr>)

    (3) 예

 

 

17. LISTP

    (1) 기능

      지정 요소가 List구조로 구성되어 있는지를 파악하는 비교함수.

      (Atom으로 구성되어 있으면 Nil을 응답한다.)

    (2) 사용법

      (LISTP  list)

    (3) 예

 

 

18. MAPCAR

    (1) 기능

      지정 List를 List의 구조대로 지정 함수대입하여 처리하고, 결과를 List 구조대로 리턴 해주는 함수. (대입되는 List 와 리턴되는 List의 구조가 같다.)

    (2) 사용법

      (MAPCAR  function  list)

    (3) 예

 

 

수학 함수

최초 작성일 2000.02.25

COMMAND 함수

최종 수정일 2006.03.24