|
|
|
|
527, 2112, 4755, 8456, 13215, 19032, 25907, 33840, 42831, 52880, 63987, 76152, 89375, 103656, 118995, 135392, 152847, 171360, 190931, 211560, 233247, 255992, 279795, 304656, 330575, 357552, 385587, 414680, 444831, 476040, 508307, 541632
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The identity (529*n-1)^2-(529*n^2-2*n)*(23)^2=1 can be written as A158365(n)^2-a(n)*(23)^2=1.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 3*a(n-1) -3*a(n-2) +a(n-3).
G.f.: x*(-527-531*x)/(x-1)^3.
|
|
MATHEMATICA
|
LinearRecurrence[{3, -3, 1}, {527, 2112, 4755}, 50]
|
|
PROG
|
(Magma) I:=[527, 2112, 4755]; [n le 3 select I[n] else 3*Self(n-1)-3*Self(n-2)+1*Self(n-3): n in [1..50]];
(PARI) a(n) = 529*n^2 - 2*n.
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|