//right-hand has a constant 10 with fibs function
(defun fibs (n)
(if (eq n 1)
2(if (eq n 2)
3(+ 10
(- (* 6 (fibs (- n 1) ) )
(* 8 (fibs (- n 2) ) ))))))
gof(t+2)-6*f(t+1)+8*f(t)=10
f(t+3)-6*f(t+2)+8*f(t+1)=10
go ( below minus above)
f(t+3)-7*f(t+2)+14*f(t+1)-8*f(t)=0
go(x-2)(x-1)(x-4)=0
go2*a+4*b+c=2
4*a+16*b+c=3
8*a+64*b+c=12
goa=-5/4
b=7/24
c=10/3
(defun pow (num count)
(if (> count 0)
(* num (pow num (- count 1) ) )1)
)(setq a (- 0 (/ 5 4.0) ))
(setq b (/ 7 24.0))
(setq c (/ 10 3.0))
(defun formula (n)
(+ (* a (pow 2 n))
(* b (pow 4 n))
c ))
(defun test (n)
(if (> n 0)
(progn
(print (formula n))
(print (fibs n))
(test (- n 1) ))
(print 'over)))
(test 10)
C 擴充套件 2 Random的擴充套件
在.net中關於random一共也只有這幾個方法 摘要 表示偽隨機數生成器,一種能夠產生滿足某些隨機性統計要求的數字序列的裝置。comvisible true public class random 提供的方法很少,所以我們很有必要我們可以擴充套件一下 public static t nextenu...
交替遞迴解fibs數列 線性複雜度
交替遞迴解fibs數列 線性複雜度 defun fibs help lst cons cons caar lst cadar lst list caar lst list car lst defun fibs labela labelb if eq labelb 1 1 1 1 0 fibs hel...
PHP擴充套件開發(2) 實現類擴充套件
在第一篇文章中,我們所開發的擴充套件是單個函式,本篇文章看一下如何開發乙個類擴充套件。假設我們要用php擴充套件實 現乙個類person,它有乙個private的成員變數 name和兩個public的例項方法getname 和setname 可以用 php 表示如下 class person pub...