方案：在同一个函数中使用函数结果作为参数

Question

我想创建一个递归方案函数，将其结果用作自身的参数。所以基本上，我希望 get-successor 迭代多次，每次将 x 替换为 get-successor 上一次迭代的结果。被引用的函数子列表只是从 lst 中选择一个子列表。我已经坚持了几天了，所以任何帮助都非常感谢！

(define (get-successor lst x)
  (car (shuffle (cdr (sub-list lst x)))))

Answer 1

请记住，要使递归函数真正递归，它需要……嗯，递归。这就是：它需要调用自己。此外，您需要一个基本情况，以便您的递归函数最终停止递归，否则您将耗尽内存。

我不完全理解您的要求，但我确实记得曾经递归地遍历列表，这可能会对您有所帮助：

#lang racket
(define in?
  (lambda (lst x)
    (if
     (empty? lst) #f ;If the list is empty, x is not in lst.
     (if (equal? (car lst) x) #t ;If the first element is x then x it's in lst.
         (in? (cdr lst) x) ; the first element is not x, check with the rest of the list recursively
     )
    )
)
)

这段代码有什么作用？它告诉你x 是否在lst 列表中。 对于这个例子，我使用尾递归，只分析列表的第一个（前/车）元素，如果它恰好与x 不同，那么我丢弃这个元素并继续列表的其余/cdr .

什么时候停止？当列表为空或我们找到x时。

什么时候列表是空的？当我们遍历列表的每个元素时。 （cdr 取出第一个元素并返回列表的其余部分）

希望您在使用 DrRacket 编程时玩得愉快，它是我最喜欢的语言。如果您还有疑问，请务必告诉我们！

回头见。