KagamiYuunagi 2019-03-15 10:51
浏览 175

关于sicp书中 1.36的问题

第一次读题的时候,把题目中给的表达式看错成了
log(1000 / log(x)),然后发现采用平均阻尼的步数比不用平均阻尼更多。想问一下应该怎么证明这个情况。然后在什么时候会发生这种情况。谢谢

(define tolerance 0.00001)

(define (fixed-point f first-guess)
    (define (close-enough? v1 v2)
        (< (abs (- v1 v2)) tolerance))
    (define (try guess)
        (display guess)
        (display #\newline)
        (let ((next (f guess)))
            (if (close-enough? guess next)
                next
                (try next))))
    (try first-guess))

(define (abs x)
    (if (< x 0)
        -x
        x))

(fixed-point (lambda (x) (log (/ 1000 (log x)))) 2)
(display #\newline)
(fixed-point (lambda (x) (/ (+ x (log (/ 1000 (log x))))2)) )
(exit)

  • 写回答

0条回答 默认 最新

    报告相同问题?

    悬赏问题

    • ¥15 扩散模型sd.webui使用时报错“Nonetype”
    • ¥15 stm32流水灯+呼吸灯+外部中断按键
    • ¥15 将二维数组,按照假设的规定,如0/1/0 == "4",把对应列位置写成一个字符并打印输出该字符
    • ¥15 NX MCD仿真与博途通讯不了啥情况
    • ¥15 win11家庭中文版安装docker遇到Hyper-V启用失败解决办法整理
    • ¥15 gradio的web端页面格式不对的问题
    • ¥15 求大家看看Nonce如何配置
    • ¥15 Matlab怎么求解含参的二重积分?
    • ¥15 苹果手机突然连不上wifi了?
    • ¥15 cgictest.cgi文件无法访问