Stream 如何在scheme中生成x和sin（x）的无限流？

我想制作一个无限流x，fx，ffx，fffx，。。。这个过程应该以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))

---

你所说的很接近，但你在其中加入了额外的关于“罪”的东西，而它应该是通用的。你所需要的就是：

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

注意f作为函数传递，而不是使用lambda