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 A079132 #5 Aug 31 2012 06:06:49 %S A079132 2,11,13,17,29,31,47,53,67,71,83,89,101,103,107,137,139,157,173,179, %T A079132 191,193,197,211,227,229,233,251,263,269,281,283,317,337,353,359,373, %U A079132 389,409,431,443,449,461,463,467,479,499,503,521,557,569,571,587,593,607 %N A079132 Primes such that iterated sum-of-digits (A038194) is even. %t A079132 Select[Prime[Range[120]], EvenQ[Mod[#, 9]] &] (* _Bruno Berselli_, Aug 31 2012 *) %o A079132 (PARI) forprime(p=2,600,if((p%9)%2==0,print1(p,","))) %Y A079132 Cf. A078403, A079130, A079131. %K A079132 nonn,easy,base %O A079132 1,1 %A A079132 _Klaus Brockhaus_, Dec 28 2002