cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A260157 Smallest term of the first run of at least n consecutive integers which are not sums of 2 squares.

This page as a plain text file.
%I A260157 #12 Nov 25 2015 02:37:29
%S A260157 3,6,21,21,75,91,186,378,987,987,1494,1494,1494,1494,5166,5166,5166,
%T A260157 5166,16110,16869,31658,31658,31658,52394,101350,101350,101350,105573,
%U A260157 241883,241883,284003,284003,284003,685542,1437354,1751297,1853867,1853867,1853867,1853867,1853867,1853867,1853867,1853867,1853867,1853867,1853867
%N A260157 Smallest term of the first run of at least n consecutive integers which are not sums of 2 squares.
%e A260157 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.
%t A260157 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 *)
%Y A260157 Cf. A022544.
%K A260157 nonn
%O A260157 1,1
%A A260157 _Ivan Neretin_, Nov 09 2015