大家好,又见面了,我是你们的朋友全栈君。如果您正在找激活码,请点击查看最新教程,关注关注公众号 “全栈程序员社区” 获取激活教程,可能之前旧版本教程已经失效.最新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有可能算不出来;
发布者:全栈程序员-用户IM,转载请注明出处:https://javaforall.cn/194966.html原文链接:https://javaforall.cn
【正版授权,激活自己账号】: Jetbrains全家桶Ide使用,1年售后保障,每天仅需1毛
【官方授权 正版激活】: 官方授权 正版激活 支持Jetbrains家族下所有IDE 使用个人JB账号...