如何在方案中制作x和sin（x）的无限流？

Question

我想制作一个无限流（x，f（x），f（f（x），f（f（f（x））），...），该过程应将x作为值和f作为过程。我尝试了以下代码，但我不知道这是不是真的...我该如何改善我的代码？

(define (f_stream x f) (cons-stream x (f_stream (f x) (lambda (x)
(sin x)) (f x)))) (sin x)) (f x))))

(define (f x) (sin x))

Answer 1

您所接近的是什么，但是您应该在其中添加一些有关“罪恶”的东西，尽管它应该是通用的。您只需要这样：

(define (f_stream x f) (cons-stream x (f_stream (f x) f)))

通知f作为函数而不是使用lambda传递。