|
| |
|
|
A028028
|
|
Expansion of 1/((1-3*x)*(1-4*x)*(1-5*x)*(1-9*x)).
|
|
1
| |
|
|
1, 21, 286, 3234, 33187, 322455, 3035152, 28040628, 256229413, 2326373049, 21042916258, 189930286182, 1712158289479, 15423616827003, 138884571944404, 1250325501927096, 11254768340210185, 101302177508279517
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
LINKS
| Vincenzo Librandi, Table of n, a(n) for n = 0..1000
|
|
|
FORMULA
| a(n) = (243/40)*9^n - (125/8)*5^n + (64/5)*4^n - (9/4)*3^n. - Neven Juric, Oct 22 2009
a(0)=1, a(1)=21, a(2)=286, a(3)=3234, a(n)=21*a(n-1)-155*a(n-2)+ 483*a(n-3)- 540*a(n-4) [From Harvey P. Dale, Aug 11 2011]
|
|
|
MATHEMATICA
| CoefficientList[Series[1/((1-3x)(1-4x)(1-5x)(1-9x)), {x, 0, 30}], x] (* or *) LinearRecurrence[{21, -155, 483, -540}, {1, 21, 286, 3234}, 30] (* From Harvey P. Dale, Aug 11 2011 *)
|
|
|
PROG
| (MAGMA) [(243/40)*9^n - (125/8)*5^n + (64/5)*4^n - (9/4)*3^n: n in [0..20]]; // Vincenzo Librandi, Aug 12 2011
|
|
|
CROSSREFS
| Sequence in context: A176711 A025987 A125456 * A025971 A188710 A025967
Adjacent sequences: A028025 A028026 A028027 * A028029 A028030 A028031
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
| |
|
|
