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 A122128 #2 Mar 31 2012 13:20:28
%S A122128 97,1567204831,771745495049,2523423764749,7766703722053,
%T A122128 16167518745751,28962816187367,42932141486099,65562552714433,
%U A122128 109392979058371,142311158323421,194472382292633,434809071709709,654363068549089
%N A122128 Primes of form Sum[ Prime[k]^4, {k,1,n} ] or primes in A122102[n].
%C A122128 A122102[n] = Sum[ Prime[k]^4, {k,1,n} ] begins {16,97,722,3123,17764,46325,...}. Indices n such that A122102[n] is prime are listed in A122127[n] = {2,32,90,110,134,152,168,180,194,212,222,234,270,290,300,...}.
%F A122128 a(n) = A122102[ A122127[n] ].
%t A122128 Select[Table[Sum[Prime[k]^4,{k,1,n}],{n,1,700}],PrimeQ[ #1]&]
%Y A122128 Cf. A122102, A122127.
%K A122128 nonn
%O A122128 1,1
%A A122128 _Alexander Adamchuk_, Aug 20 2006