【SICP练习】68 练习2.39

练习2.39

通过前一习题的类比相信已经知道了fold-left和fold-right的内在意义，本题中要求的逆序数可以用cons来构造。具体为，先将list的第一个元素取出用(cons (car list) ‘() )构造，接着第二个、第三个……用(cons …… (cons (car (car list) ) (cons (carlist) ‘())))。当然了，在这个递归的过程中我们并不需要(car (car list))，用(car list)不断的代换list即可。

根据题目中设置好的对应关系，nil对应x，sequence对应y。于是：

(define (reverse sequence)

   (fold-left (lambda (x y)

                 (cons y x))

             ‘()

               sequence))

同样的，fold-right也是用到类似的关系，区别就在于用的是append和list的组合。如果不懂的就慢慢领会了。

(define (reverse sequence)

   (fold-right (lambda (x y)

                   (append y (list x)))

              ‘()

                sequence))

写完了函数就只管测试了。

(reverse ‘(1 3 5 7 9 2 4 6 8))

;Value: (8 6 4 2 9 7 5 3 1)