|
|
A158070
|
|
a(n) = 64*n^2 + 2*n.
|
|
2
|
|
|
0, 66, 260, 582, 1032, 1610, 2316, 3150, 4112, 5202, 6420, 7766, 9240, 10842, 12572, 14430, 16416, 18530, 20772, 23142, 25640, 28266, 31020, 33902, 36912, 40050, 43316, 46710, 50232, 53882, 57660, 61566, 65600, 69762, 74052, 78470, 83016
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
The identity (64*n + 1)^2 - (64*n^2 + 2*n)*8^2 = 1 can be written as A158071(n)^2 - a(n)*8^2 = 1. - Vincenzo Librandi, Feb 11 2012
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3), a(1)=66, a(2)=260, a(3)=582. - Harvey P. Dale, Jul 25 2011 [corrected by M. F. Hasler, Oct 09 2014]
|
|
MATHEMATICA
|
Table[64n^2+2n, {n, 40}] (* or *) LinearRecurrence[{3, -3, 1}, {66, 260, 582}, 40] (* Harvey P. Dale, Jul 25 2011 *)
|
|
PROG
|
(Magma) I:=[66, 260, 582]; [n le 3 select I[n] else 3*Self(n-1)-3*Self(n-2)+1*Self(n-3): n in [1..40]]; // Vincenzo Librandi, Feb 11 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|