OFFSET
0,2
COMMENTS
Generalized Fib(x) = (phi^x - cos(x*Pi) / phi^x) / sqrt(5) where phi = (1 + sqrt(5))/2.
LINKS
Harry J. Smith, Table of n, a(n) for n = 0..100
Harry J. Smith, Generalized Fibonacci numbers
EXAMPLE
a(2) = 120 because Fib(2*I) = -68.179... + 98.623... * I, whose absolute value is 119.895..., and rounded gives 120.
PROG
(PARI) { default(realprecision, 150); s5 = sqrt(5); phi = (1 + s5)/2.0; for (n=0, 100, x=n*I; f = round(abs((phi^x - cos(x*Pi) / phi^x) / s5)); write("b158564.txt", n, " ", f)) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Harry J. Smith, Mar 21 2009
STATUS
approved