4

我熟悉其他语言中的while循环，但在这里我写了一个小函数来计算项和的导数，但它只计算前两个我想知道是否有办法改变它以考虑更多2？

表达式, E, 表示为列表，因此2x + 2y + x^3表示为(+ (* 2 x) (* 2 y) (expt x 3))

请注意，我已经编写了用于计算指数的函数，但它是总和的一部分，并且在前 2 个之后停止

(define (make-sum v1 v2)
  (list '+ v1 v2))

(define (diff-sum x E)
  (make-sum (diff x (first-operator E)) (diff x (last-operator E))))
4

1 回答 1

17

在专业级的 Racket 中，for 循环是对序列执行某些操作的标准方法。例如，以下生成一个简单的乘法表：

(define numbers (list 1 2 3 4 5 6))
(for/list ([item numbers])
  (list item (* item 2) (* item 3)))

这是一个循环遍历每个数字，对其进行处理，并生成一个新的结果列表。相当标准；几乎每种编程语言都有跨集合迭代的概念。

在你必须为介绍性计算机科学课程编写的那种 Racket 中，你可能不得不求助于显式递归或像map这样的高阶函数，这取决于你的导师。这些其他表达迭代的方式与上面的循环具有相同的功能：我们只是用不同的方式表达它。

例如，创建上述小型乘法表的相同计算将通过显式递归表示如下：

(define (my-loop numbers)
  (cond [(empty? numbers) '()]
        [else
         (define item (first numbers))
         (cons (list item (* item 2) (* item 3))
               (my-loop (rest numbers)))]))
(my-loop numbers)

并隐含地使用map：

(define (f item)
  (list item (* item 2) (* item 3)))
(map f numbers)
于 2012-10-19T03:42:52.200 回答