在方案中使用地图

Question

我创建了一个名为电影满意的过程：

(define movies-satisfying          
    (lambda (movies pred selector)
      (map (pred movies))))

这就是我所说的程序。

(movies-satisfying our-movie-database
               (lambda (movie)
                 (= (movie-year-made movie) 1974))
               movie-title)

电影标题=汽车。 我们的电影数据库是电影的数据库。

它从数据库（电影名称，导演，制作日期和演员）开始返回有关电影的大量信息。 如何仅返回电影标题而不是整个列表？

这是当前返回的内容：

 (((amarcord)
  (federico fellini)
  1974
  ((magali noel) (bruno zanin) (pupella maggio) (armando drancia)))

Answer 1

在不了解更多代码的情况下不可能给出完美的答案（如我的评论所述），但是我可以概述答案，诀窍是进行两次通过-当然，前提是谓词和选择器都正确定义。 例如，特定的搜索将如下所示：

(map (lambda (movie) ; 2nd pass: obtain the names of the movies returned by 1st pass
       (movie-title movie))
     (filter (lambda (movie) ; 1st pass: obtain only the movies of a given year
               (= (movie-year-made movie) 1974))
             our-movie-database))

要将以上内容编写为可参数化的函数，只需将lambdas作为参数传递：

(define movies-satisfying          
  (lambda (movies pred selector)
    (map selector (filter pred movies))))

另请注意，必须使用filter来查找给定谓词的匹配项， map始终会返回与原始输入列表大小相同的列表。