|
| |
|
|
A078010
|
|
Expansion of (1-x)/(1-x-x^2-2*x^3).
|
|
2
| |
|
|
1, 0, 1, 3, 4, 9, 19, 36, 73, 147, 292, 585, 1171, 2340, 4681, 9363, 18724, 37449, 74899, 149796, 299593, 599187, 1198372, 2396745, 4793491, 9586980, 19173961, 38347923, 76695844, 153391689, 306783379, 613566756, 1227133513, 2454267027, 4908534052
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
FORMULA
| a(0)=1, a(1)=0, a(2)=1, a(n)=a(n-1)+a(n-2)+2*a(n-3) for n>2 . - Philippe DELEHAM (kolotoko(AT)wanadoo.fr), Sep 19 2006
a(n)+a(n+1)=A122552(n+1) . - Philippe DELEHAM (kolotoko(AT)wanadoo.fr), Sep 25 2006
If p[1]=0, p[2]=1, p[i]=3, (i>2), and if A is Hessenberg matrix of order n defined by: A[i,j]=p[j-i+1], (i<=j), A[i,j]=-1, (i=j+1), and A[i,j]=0 otherwise. Then, for n>=1, a(n)=det A. [From Milan R. Janjic (agnus(AT)blic.net), May 02 2010]
|
|
|
MATHEMATICA
| CoefficientList[Series[(1-x)/(1-x-x^2-2*x^3), {x, 0, 50}], x] (* From Harvey P. Dale, Mar 17 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A178784 A192288 A028344 * A110810 A049978 A092763
Adjacent sequences: A078007 A078008 A078009 * A078011 A078012 A078013
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Nov 17 2002
|
| |
|
|
