|
|
A245625
|
|
Sequence of distinct least nonnegative numbers such that the average of the first n terms is a square.
|
|
1
|
|
|
0, 2, 1, 13, 4, 34, 9, 65, 16, 106, 25, 157, 36, 218, 49, 289, 64, 370, 81, 461, 100, 562, 121, 673, 144, 794, 169, 925, 196, 1066, 225, 1217, 256, 1378, 1514, 324, 1693, 361, 1882, 400, 2081, 441, 2290, 484, 2509, 529, 2738, 576, 2977, 625, 3226, 676, 3485, 729, 3754, 784, 4033, 841
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Table of n, a(n) for n=1..58.
|
|
PROG
|
(PARI) v=[]; n=0; while(n<10^4, num=(vecsum(v)+n); if(num%(#v+1)==0&&vecsearch(vecsort(v), n)==0, for(i=0, n, if(i^2>(num/(#v+1)), break); if(i^2==(num/(#v+1)), print1(n, ", "); v=concat(v, n); n=0; break))); n++)
|
|
CROSSREFS
|
Cf. A085047.
Sequence in context: A037271 A074955 A352571 * A292947 A143663 A064079
Adjacent sequences: A245622 A245623 A245624 * A245626 A245627 A245628
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Derek Orr, Nov 05 2014
|
|
STATUS
|
approved
|
|
|
|