login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A173661 Logarithmic derivative of the squares of the Fibonacci numbers (A007598, with offset). 0
1, 7, 16, 47, 121, 322, 841, 2207, 5776, 15127, 39601, 103682, 271441, 710647, 1860496, 4870847, 12752041, 33385282, 87403801, 228826127, 599074576, 1568397607, 4106118241, 10749957122, 28143753121, 73681302247, 192900153616, 505019158607 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
The Lucas numbers (A000032) forms the logarithmic derivative of the Fibonacci numbers (A000045).
LINKS
FORMULA
a(n) = Lucas(n)^2 for odd n, a(n) = Lucas(n)^2 - 2 for even n>0.
O.g.f.: x*(1+4*x-5*x^2+2*x^3)/((1-x^2)*(1-3*x+x^2)).
EXAMPLE
G.f.: L(x) = x + 7*x^2/2 + 16*x^3/3 + 47*x^4/4 + 121*x^5/5 +...
exp(L(x)) = 1 + x + 2^2*x^2 + 3^2*x^3 + 5^2*x^4 + 8^2*x^5 +...
PROG
(PARI) {a(n)=(fibonacci(n-1)+fibonacci(n+1))^2-2*((n-1)%2)}
(PARI) {a(n)=polcoeff(deriv(log(sum(m=0, n, fibonacci(m)^2*x^m)+x*O(x^n))), n)}
(PARI) {a(n)=polcoeff(x*(1+4*x-5*x^2+2*x^3)/((1-x^2)*(1-3*x+x^2+x*O(x^n))), n)}
CROSSREFS
Sequence in context: A304013 A037241 A154141 * A152530 A065099 A001345
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Nov 24 2010
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 24 19:24 EDT 2024. Contains 371962 sequences. (Running on oeis4.)