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.
%I A121518 #4 Mar 30 2012 17:22:43
%S A121518 1,2,3,5,6,7,8,10,11,12,14,15,16,17,18,19,20,21,22,23,24,26,27,28,30,
%T A121518 31,32,33,35,36,37,39,40,41,42,43,44,45,46,47,48,50,51,52,54,55,56,57,
%U A121518 59,60,61,63,64,65,66,67,68,69,70,71,72,73,75,76,77,79,80,81,82,84,85,86
%N A121518 Numbers that are not the sum of the squares of distinct primes.
%C A121518 There are 2438 terms, the largest of which is 17163.
%D A121518 See A048261.
%H A121518 T. D. Noe, <a href="/A121518/b121518.txt">Table of n, a(n) for n = 1..2438</a>
%F A121518 Complement of A048261.
%t A121518 s={0}; Do[p=Prime[n]; s=Union[s,s+p^2], {n,PrimePi[140]}]; s=Select[s,0<#<Prime[PrimePi[140]]^2&]; Complement[Range[s[[ -1]]],s]
%K A121518 fini,nonn
%O A121518 1,2
%A A121518 _T. D. Noe_, Aug 04 2006