大家好，又见面了，我是你们的朋友全栈君。如果您正在找激活码,请点击查看最新教程,关注关注公众号 “全栈程序员社区” 获取激活教程,可能之前旧版本教程已经失效.最新Idea2022.1教程亲测有效,一键激活。
Jetbrains全系列IDE使用 1年只要46元 售后保障 童叟无欺
不动点与递归数列的极限
有些收敛的数列才有不动点，比如x=1+x^(-1) ;x=1+x^(-2);x=1+x^(-3),下面写程序验证：
对x=1+x^(-3)：
(defun pow (num count)
(if (or (> count 1) (eq count 1) )
(* num
(pow num
(- count 1) ) )
1))
(defun expr (n x)
(if (> n 0)
(expr (1- n)
(+ 1
(/ 1.0
(pow x 3) )))
x))
(defun formula (x)
(- x
(+ 1
(/ 1.0
(pow x 3)))))
(defun test (n)
(if (> n 0)
(progn
(print (expr 200 n))
(print ‘compare)
(print (formula (expr 200 n)))
(test (- n 1)))
(print ‘over)))
(test 100)
用这种方法可以解答所有这种形式的不动点;其中负级数越高，需要的递归次数越多，所以其中的200有可能算不出来；
发布者：全栈程序员-站长，转载请注明出处：https://javaforall.net/194966.html原文链接：https://javaforall.net
