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 A122127 #2 Mar 31 2012 13:20:28 %S A122127 2,32,90,110,134,152,168,180,194,212,222,234,270,290,300,302,368,530, %T A122127 540,548,570,582,630,650,698,810,848,888,914,920,930,968,990,1100, %U A122127 1122,1148,1218,1232,1242,1320,1340,1350,1364,1388,1418,1448,1452,1514 %N A122127 Indices n such that A122102[n] = Sum[ Prime[k]^4, {k,1,n}] is a prime. %C A122127 Corresponding primes of form Sum[ Prime[k], {k,1,n} ] are listed in A122128[n] = {97,1567204831,771745495049,...}. %t A122127 Select[Range[1514],PrimeQ[Sum[Prime[k]^4,{k,1,#1}]]&] %Y A122127 Cf. A122102, A122128. %K A122127 nonn %O A122127 1,1 %A A122127 _Alexander Adamchuk_, Aug 20 2006