깊은 목록 구성에 대한 재귀 호출

Question

목록을 입력으로 사용하고 목록 또는 원자를 반환하는 함수를 만들었습니다. 깊은 목록에이 함수를 적용하고 내부 목록부터 시작하여 함수가 외부 목록에서 실행되면 끝내기를 원합니다.

누군가 내게 어떤 방향을 제시 할 수 있습니까?

샘플 입력은 (a b (c (d e))) z가 될 것입니다. 함수는 먼저 f의 결과로 (d e)를 계산해야합니다. 함수는 (g)의 결과를 가지고 (c f)를 계산하고, h의 결과를 산출하기 위해 (a b g z)를 계산해야한다.

예시적인 기능 일 수 :

(define sum 
(lambda (l) 
    (if (not (pair? l)) 
    0 
    (+ (car l) (sum (cdr l)))))) 

가 입력 될 것 인 (1 2/5 (3 4)) 여기서

Answer 1

하여 가정 Scheme 프로 시저로 표현 된 예제 변환 :

(define (transform lst) 
    (case lst 
    (((d e)) 'f) 
    (((c f)) 'g) 
    (((a b g z)) 'h) 
    (else (error (~a "wot? " lst))))) 

는 당신을 위해 무엇을 찾고있는

(define (f lst) 
    (transform 
    (map (lambda (e) 
      (if (list? e) (f e) e)) 
     lst))) 

테스트 것 같다 :

> (f '(a b (c (d e)) z)) 
'h 

Answer 2

15 일례이다>

(define product 
    (lambda (l) 
    (cond 
     [(number? l) l] 
     [(pair? l) (* (product (car l)) (product (cdr l)))] 
     [else  1]))) 

> (product '(1 2 (3 4) 5)) 
120