[go: up one dir, main page]

login
A154350
a(n) = ( (9 + 2*sqrt(2))^n - (9 - 2*sqrt(2))^n )/(4*sqrt(2)).
1
1, 18, 251, 3204, 39349, 474390, 5666543, 67367304, 798953833, 9463355802, 112016774627, 1325476969740, 15681360907549, 185504677544862, 2194344849556439, 25956365831240976, 307027410944717521
OFFSET
1,2
COMMENTS
lim_{n -> infinity} a(n)/a(n-1) = 9 + 2*sqrt(2) = 11.8284271247....
FORMULA
G.f.: x/(1 - 18*x + 73*x^2). - Klaus Brockhaus, Jan 12 2009, corrected Oct 08 2009
a(n) = 18*a(n-1) - 73*a(n-2) for n>1, with a(0)=0, a(1)=1. - Philippe Deléham, Jan 12 2009
E.g.f.: (1/(2*sqrt(2)))*exp(9*x)*sinh(2*sqrt(2)*x). - G. C. Greubel, Sep 14 2016
MATHEMATICA
Join[{a=1, b=18}, Table[c=18*b-73*a; a=b; b=c, {n, 40}]] (* Vladimir Joseph Stephan Orlovsky, Feb 09 2011 *)
LinearRecurrence[{18, -73}, {1, 18}, 25] (* or *) Table[( (9 + 2*sqrt(2))^n - (9 - 2*sqrt(2))^n )/(4*sqrt(2)), {n, 1, 25}] (* G. C. Greubel, Sep 14 2016 *)
PROG
(Magma) Z<x>:=PolynomialRing(Integers()); N<r>:=NumberField(x^2-2); S:=[ ((9+2*r)^n-(9-2*r)^n)/(4*r): n in [1..17] ]; [ Integers()!S[j]: j in [1..#S] ]; // Klaus Brockhaus, Jan 12 2009
CROSSREFS
Cf. A002193 (decimal expansion of sqrt(2)).
Sequence in context: A153886 A154241 A154250 * A001722 A060788 A144708
KEYWORD
nonn
AUTHOR
Al Hakanson (hawkuu(AT)gmail.com), Jan 07 2009
EXTENSIONS
Extended beyond a(7) by Klaus Brockhaus, Jan 12 2009
Edited by Klaus Brockhaus, Oct 08 2009
STATUS
approved