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 A116045 #8 Feb 10 2014 21:34:18
%S A116045 1,4,5,9,13,17,19,21,25,33,35,39,41,43,49,61,75,79,85,87,95,101,121,
%T A116045 133,137,141,153,155,159,163,165,169,177,181,193,199,201,203,207,213,
%U A116045 215,231,233,245,251,257,259,265,267,271,277,291,299,307,309,337,339
%N A116045 n+phi(n)+phi(phi(n)) is a prime.
%e A116045 13+phi(13)+phi(phi(13)) = 29.
%t A116045 epQ[n_]:=Module[{ep=EulerPhi[n]},PrimeQ[n+ep+EulerPhi[ep]]]
%t A116045 Select[Range[400],epQ] (* _Harvey P. Dale_, Mar 06 2011 *)
%Y A116045 Cf. A068080.
%K A116045 nonn
%O A116045 1,2
%A A116045 _Giovanni Resta_, Feb 13 2006