SICP 习题2.32 subsets 寻找子集

原创于 2016-06-24 15:21:06 发布 · 467 阅读

0 ·

CC 4.0 BY-SA版权

SICP 专栏收录该内容

77 篇文章

订阅专栏

本文探讨了一种特殊情况下使用Map处理空列表时出现的问题，并给出了解决方案。作者最初尝试使用特定语法来处理空列表，但发现这种方法会导致Map无法正常工作。通过调整代码逻辑，最终采用'(nil)'作为占位符解决了这一问题。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

写代码的时候遇到一个奇葩的问题，

（if (null? s) 
    '()
    ...)

开始我是这样写的，然后发现这样写了之后,map不认账，map rest的时候直接不处理空列表，然后就返回一个（）了。

(define (subsets s)
  (if (not (null? s)) (display (car s)))
  (if (null? s)
    '(nil)
    (let ((rest (subsets (cdr s))))
      (append rest (map (lambda (x) (cons (car s) x)) rest)))))

(subsets (list 1 2 3))

SICP 习题2.32 subsets 寻找子集

写代码的时候遇到一个奇葩的问题，

开始我是这样写的，然后发现这样写了之后,map不认账，map rest的时候直接不处理空列表，然后就返回一个（）了。

这里用’(nil)可以，用(list nil)是通不过编译的。应该是实现的问题。