map - スキームで map-odd-mapper というプロシージャを作成しようとしています

Question

リストに適用できるプロシージャを取得する map-odd-mapper というプロシージャを作成しようとしています

元：

((make-odd-mapper add-one) (list 14 38 29 10 57))
(15 30 58)

私はそれを let 関数として (define (make-odd-mapper f) (let (..........何か ret-odds を使用してインデックスを許可し、取得できるようにする) として配置することを考えていました。奇数……

ret-odds は次のように定義されます (define (ret-odds lst) (if (null? lst) null (cons (car lst) (if (null? (cdr lst)) null (ret-odds (cdr (cdr lst)))) ))))) これのポイントは、add-one などのプロシージャを奇数インデックスのリストに適用できるようにする proc を作成することです....

Answer 1

この問題は、2 つの小さな問題に分けることができます。衒学的になるリスクがありますが、これら 2 つの小さな問題が何であるかを説明し、それらのテスト ケースを提供していただけますか?

Answer 2

(define (make-odd-mapper f) (lambda (lst) (ret-odds (map f lst))))