|
|
A260157
|
|
Smallest term of the first run of at least n consecutive integers which are not sums of 2 squares.
|
|
2
|
|
|
3, 6, 21, 21, 75, 91, 186, 378, 987, 987, 1494, 1494, 1494, 1494, 5166, 5166, 5166, 5166, 16110, 16869, 31658, 31658, 31658, 52394, 101350, 101350, 101350, 105573, 241883, 241883, 284003, 284003, 284003, 685542, 1437354, 1751297, 1853867, 1853867, 1853867, 1853867, 1853867, 1853867, 1853867, 1853867, 1853867, 1853867, 1853867
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
None of 21, 22, 23, and 24 is representable as a sum of two squares. Previous record of run length was 2, hence a(3)=a(4)=21.
|
|
MATHEMATICA
|
t = Select[Range[10^4], SquaresR[2, #] == 0 &]; SelectFirst[t, Function[n, ContainsAll[t, n + Range@ #]]] & /@ Range[0, 15] (* Michael De Vlieger, Nov 09 2015, Version 10.2 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|