フィボナッチ数列の公式

• フィボナッチ数列を求める公式とか計算量（オーダー）の話とか - このブログは証明できない。

今日の 9LISP で shunsuk さんに教えて頂きました。

	(define (fib-p n)
	(let1 r5 (sqrt 5)
	(round->exact (* (/ 1 r5)
	(- (expt (/ (+ 1 r5) 2) n)
	(expt (/ (- 1 r5) 2) n))))))
	(use srfi-1)
	(map fib-p (iota 30 1))
	;; (1 1 2 3 5 8 13 21 34 55 89 144 233 377 610 987 1597 2584 4181 6765 10946 17711 28657 46368 75025 121393 196418 317811 514229 832040)

view raw fib-p.scm hosted with ❤ by GitHub

知りませんでした。。

• vallog: 「最も簡単に fib を高速化する方法」を試してみた。