각각에 대한-하지 않는 출력 값은

Question

나는에 대한-각 체계에 새로운 목록을 생성하지 않는 것을 이해하지만 내 출력에, 나는 예상 : 난 그냥 "완료"얻고

4 
9 
16 
done. 

.

여기 무슨 일 이니?

(define (for-each proc list) 
    (cond ((null? list) "done") 
      (else 
       (proc (car list)) 
       (for-each proc (cdr list))))) 


(define square (lambda(x)(* x x))) 
(square 5) 

(for-each square (list 2 3 4)) 

Answer 1

코드에서 (proc (car list)) 코드는 실행될 수 있지만 그 결과는 무시됩니다. 그냥 제곱 함수의 결과를 인쇄 할 경우이 시도 :

(for-each (lambda (x) (display (square x)) (newline)) ; applies function on each element 
      '(2 3 4)) 
=> 4 
    9 
    16 
    done 

당신이 입력 목록의 각 요소에 대해 절차를 적용하는 결과를 얻을하려는 경우, 당신은 map하지 for-each을 사용해야합니다 :

(map square '(2 3 4)) 
=> '(4 9 16) 

for-each 입력리스트를 반복 실행하고 각 구성 요소를 통해 동작을 수행하지만, 단지 그 효과 용 (예를 들어, 각 소자를 인쇄). 출력 목록에 결과를 누적하지 않으며 명시 적으로 언급하지 않는 한 도 인쇄하지 않습니다. 반면에 map은 입력리스트를 반복하고 각 요소에 대해 연산을 수행 한 다음 출력에 결과를 누적합니다 명부.