scheme - 将功能列表应用于数字

Question

我了解Scheme/Racket中的功能(例如 map ，文件夹和过滤器)可以做一些很棒的事情，例如将功能应用于元素列表。

是否可以将功能列表应用于单个元素？

我想生成每个函数产生的值，然后找到它们的最大值。谢谢你。

Answer 1

对于第一部分，此过程将把函数列表应用于单个参数，假设所有函数仅接收一个参数。返回结果列表

(define (apply-function-list flist element)
  (map (lambda (f)
         (f element))
       flist))

对于第二部分，在列表中找到最大值很简单。例如，如果元素为 2，而函数列表为 (list sin cos sqr sqrt):

(apply max
 (apply-function-list (list sin cos sqr sqrt) 2))

编辑:

这是另一种可能的解决方案，无需使用 apply且只需一个过程:

(define (max-list-function flist element)
  (foldr max -inf.0
         (map (lambda (f) (f element))
              flist)))

像这样使用它:

(max-list-function (list sin cos sqr sqrt) 2)