|
| |
|
|
A016149
|
|
Expansion of 1/((1-4*x)*(1-6*x)).
|
|
4
| |
|
|
1, 10, 76, 520, 3376, 21280, 131776, 807040, 4907776, 29708800, 179301376, 1080002560, 6496792576, 39047864320, 234555621376, 1408407470080, 8454739787776, 50745618595840, 304542431051776
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
LINKS
| Index to sequences with linear recurrences with constant coefficients, signature (10,-24).
|
|
|
FORMULA
| a(n)=10*a(n-1)-24*a(n-2), n>1; a(0)=1. a(n)=[(6^(n+1))-4^(n+1)]/2 - Barry E. Williams, Jan 13 2000.
a(n) = A081199(n+1). Binomial transform of A080961. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Sep 18 2008]
|
|
|
MAPLE
| seq(add(2^(2*n-k)*binomial(n, k)/2, k=1..n), n=1..19); # [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Apr 18 2009]
|
|
|
MATHEMATICA
| Join[{a=1, b=10}, Table[c=10*b-24*a; a=b; b=c, {n, 60}]] (*From Vladimir Joseph Stephan Orlovsky, Jan 27 2011*)
LinearRecurrence[{10, -24}, {1, 10}, 30] (* or *) CoefficientList[ Series[ 1/(1-10 x+24 x^2), {x, 0, 30}], x] (* From Harvey P. Dale, Apr 24 2011 *)
|
|
|
PROG
| (Sage) [lucas_number1(n, 10, 24) for n in xrange(1, 20)]# [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Apr 26 2009]
|
|
|
CROSSREFS
| Sequence in context: A136869 A108277 A061319 * A081199 A198692 A169584
Adjacent sequences: A016146 A016147 A016148 * A016150 A016151 A016152
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
| |
|
|