모두 rutilsx.iter과 iterate 라이브러리 (나는 이유는 언어 별이다 나는 경우 부탁 해요, 그 경우는 그것을 폐쇄 부담이 도서관 고유의 것으로 판명 수 이해() Quicklisp을 통해 사용 가능)는 동일한 "Don't Loop, Iterate" 라이브러리를 제공하는 것으로 보입니다. 그러나 후자는 "그냥 효과가 있지만"전자는 그렇지 않습니다
나는 palindrome이라는 함수를 작성하여 목록이 palindrome인지 테스트한다. (1 2 1)과 같은 일반 목록에서는 100 % 작동하지만, (1 (2) 1)을 사용하면 잘못된 인수 유형 오류가 발생합니다. 은 여기 내 기능 (defun palindrome (x)
(if (NULL x) t
(let ((a (c
나는 Lisp을 가진 완전한 초보자이므로 나에게 쉽게 간다. 임 배열에 이진 검색 트리를 구현하고 순서대로 출력 할 수 있습니다. 난 좌측 자식 * I는 인덱스 1 루트와 2이 배열이 2 * I + 1 우측 자식 : #(NIL 30 15 50 10 20 NIL 70 3 NIL 17 NIL NIL NIL NIL 80 NIL NIL NIL NIL NIL NIL
주어진 문제에 대해 제한된 깊이의 검색을 수행하는 코드를 작성하려고합니다.이 언어에 매우 익숙하지 않으므로 기본적으로 생각 만합니다. xD (defstruct state
pos
vel
action
cost
track
other)
(defstruct problem
initial-state
중첩 목록을 통과하고 전달 된 요소와 일치하는 요소를 삭제하는 Lisp 프로그램이 있습니다. 내 문제는 중첩 목록 중 하나에있는 모든 항목이 삭제되면 NIL 대신 out()을 인쇄해야한다는 것입니다. (defun del (x l &optional l0)
(cond ((null l) (reverse l0))
((if (atom x) (eq
트리 검색을 코딩하는 데 문제가 있습니다 & 알고리즘을 바꿉니다. 입력 트리는 임의로 중첩 된 데이터 항목을 포함합니다. 예 : tree = (1 (2 (4 (5)) 6)). 여기서 1은 루트이고 각 레벨은 괄호 안에 들어 있습니다. 그래서 1은 레벨 1에 있습니다; 2, 3, 4, 6은 레벨 2 (1 미만)에, 5는 레벨 3 (4 미만)에 있습니다. 전체
로마 숫자를 십진수 형식으로 변환하는 lisp 프로그램이 있습니다. 유효한 입력에 대해서는 훌륭하게 작동하지만 입력이 유효한 로마 숫자인지 확인하는 방법을 잘 모르겠습니다. 예를 들어 현재 유효하지 않은 입력 ("MIM")이 주어지면 여전히 잘못 변환됩니다. 대신 ERROR 메시지를 반환해야합니다. (defun mapRomanToDecimal (chars
목록의 목록을 가지고 있고 모든 요소가 서로 다른지 테스트하고 싶습니다. 즉, equal은 목록 요소의 모든 조합에 대해 nil을 반환해야합니다. 예. 표준 구조를 사용하여 간단한 방법이 있나요 (loop for i below (length feld)
for j from 1
if (equal (nth i feld) (nth j fel