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 A225519 #6 May 09 2013 16:04:08
%S A225519 13,23,41,67,101,103,113,131,157,181,191,227,281,379,421,457,461,467,
%T A225519 547,659,677,677,751,809,811,829,839,877,1039,1039,1091,1093,1109,
%U A225519 1187,1201,1223,1319,1361,1439,1453,1531,1567,1571,1613,1663,1693,1753,1789
%N A225519 Primes of the form p + sum of squares of digits of p, where p is prime.
%C A225519 Primes generated by A076162.
%e A225519 41 is a member since 41=31+(3^2+1^2).
%t A225519 Sort[Select[Table[p=Prime[n]; p+Total[IntegerDigits[p]^2],{n,262}],PrimeQ]]
%Y A225519 Cf. A048519, A048520, A076162.
%K A225519 nonn,base
%O A225519 1,1
%A A225519 _Jayanta Basu_, May 09 2013