|
|
A330386
|
|
Running totals in A330385.
|
|
2
|
|
|
1, 4, 0, 9, 16, 4, 9, 1, 16, 0, 25, 36, 49, 25, 64, 81, 100, 121, 144, 100, 64, 36, 16, 49, 9, 36, 4, 49, 1, 36, 121, 49, 100, 36, 169, 256, 196, 225, 256, 361, 484, 400, 441, 484, 625, 529, 576, 625, 784, 841, 900, 961, 1024, 1089, 1156, 1225, 1296, 1369
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
All terms are nonnegative squares.
|
|
LINKS
|
|
|
FORMULA
|
|
|
PROG
|
(PARI) s=t=0; for (n=1, 58, for (v=1, oo, if (!bittest(s, v) && issquare(u=t-v*(-1)^v), print1 (t=u ", "); s+=2^v; break)))
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|