|
| |
| |
|
|
|
1, -1, 9, 55, 161, 351, 649, 1079, 1665, 2431, 3401, 4599, 6049, 7775, 9801, 12151, 14849, 17919, 21385, 25271, 29601, 34399, 39689, 45495, 51841, 58751, 66249, 74359, 83105, 92511, 102601, 113399, 124929, 137215, 150281, 164151, 178849, 194399, 210825, 228151
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| a(n)=(2n-1)(2n^2-2n-1)=A060747(n)*A132209(n-1), n>1. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 22 2009]
G.f.: (1-5*x+19*x^2+9*x^3)/(1-x)^4. [From Jaume Oliver Lafont (joliverlafont(AT)gmail.com), Aug 30 2009]
a(0)=1, a(1)=-1, a(2)=9, a(3)=55, a(n)=4*a(n-1)-6*a(n-2)+4*a(n-3)-a(n-4) [From Harvey P. Dale, Nov 30 2011]
|
|
|
MATHEMATICA
| Table[EulerE[3, n], {n, 0, 50}]*4; ..and/or..Array[4*#^3-6*#^2+1&, 50, 0] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Nov 03 2009]
LinearRecurrence[{4, -6, 4, -1}, {1, -1, 9, 55}, 50] (* From Harvey P. Dale, Nov 30 2011 *)
|
|
|
CROSSREFS
| Cf. A141047, A141417.
Cf. A046092, A078371 (see Librandi's comment in A078371).
Sequence in context: A058852 A145875 A068970 * A016269 A005770 A030053
Adjacent sequences: A141527 A141528 A141529 * A141531 A141532 A141533
|
|
|
KEYWORD
| sign,less,changed
|
|
|
AUTHOR
| Paul Curtz (bpcrtz(AT)free.fr), Aug 12 2008
|
|
|
EXTENSIONS
| Corrected, completed and edited, following an observation from Vincenzo Librandi, by M. F. Hasler (MHasler(AT)univ-ag.frC), Feb 12 2009. Further edited by N. J. A. Sloane (njas(AT)research.att.com), Feb 13 2009
|
| |
|
|
