Lisp：リスト内のすべての値を二分する

Question

私はまだかなり新しいです。私の関数（この場合testと呼ばれます）の目的は、リスト内のすべての値を平方和し、新しいリストを返すことです。

たとえば、元のリスト(1 2 3)。 新しいリストは、これは私がこれまで持っているもの現在(1 4 9)

する必要があり、

(defun test (n) 
    (cond ((null n) nil) 
     (t (cons * (car n) (car n)) 
      (test (cdr n))))) 

は、しかし、私はエラーを取得しておくと、続行する方法へと全くわからないです。 ご迷惑をおかけして申し訳ございません。

Answer 1

コードには、condの構文（他の言語のelseに相当）と、乗算演算子がないという2つの問題があります。

これは作業バージョンである：ifは、単一条件のために使用される複数の条件が存在する場合condが最も一般的に使用されることに注意し、また

(defun test (n) 
    (cond ((null n) nil) 
     (t (cons (* (car n) (car n)) 
       (test (cdr n)))))) 

：

(defun test (n) 
    (if (null n) 
     nil 
     (cons (* (car n) (car n)) 
      (test (cdr n)))))