|
|
|
|
626, 1251, 1876, 2501, 3126, 3751, 4376, 5001, 5626, 6251, 6876, 7501, 8126, 8751, 9376, 10001, 10626, 11251, 11876, 12501, 13126, 13751, 14376, 15001, 15626, 16251, 16876, 17501, 18126, 18751, 19376, 20001, 20626, 21251, 21876, 22501, 23126
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The identity (625*n+1)^2-(625*n^2+2*n)*(25)^2=1 can be written as a(n)^2-A158382(n)*(25)^2=1.
|
|
LINKS
|
|
|
FORMULA
|
G.f.: x*(626-x)/(1-x)^2.
a(n) = 2*a(n-1)-a(n-2).
|
|
MATHEMATICA
|
LinearRecurrence[{2, -1}, {626, 1251}, 50]
|
|
PROG
|
I:=[626, 1251]; [n le 2 select I[n] else 2*Self(n-1)-Self(n-2): n in [1..50]];
(PARI) a(n) = 625*n + 1.
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|