리스트에서 정수 제거

Question

Scheme에서 구현할 수없는 이상한 문제가 있습니다. 의 우리가 있다고 가정 해 봅시다 : 나는

'((Orlando NY) 
    (Chicago Montana Orlando) 
    ...and so on ... 
) 

어떤 도움을 크게 감상 할 수로 변환 할

(define x '((Orlando (NY 3)) 
      (Chicago (Montana 5) (Orlando 8)) 
      ...and so on ... 
      ) 

.

Answer 1

또한

(map 
(lambda (x) (cons (car x) (map car (cdr x)))) 
x)