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 A207294 #27 Feb 18 2025 03:50:39
%S A207294 2,3,5,7,11,23,29,41,43,47,61,83,101,113,131,137,151,173,191,223,227,
%T A207294 241,263,281,311,313,317,331,353,401,421,443,461,599,601,641,797,821,
%U A207294 887,911,977,1013,1019,1031,1033,1051,1091,1103,1109,1123,1163,1181,1213,1217
%N A207294 Primes p whose digit sum s(p) and iterated digit sum s(s(p)) are also prime.
%C A207294 Sum_{a(n) < x} 1/a(n) is asymptotic to (9/4)*log(log(log(log(x)))) as x -> infinity; see Harman (2012). Thus the sequence is infinite.
%C A207294 The first member not in A070027 is 59899999.
%C A207294 A046704 is primes p with s(p) also prime. A070027 is primes p with all s(p), s(s(p)), s(s(s(p))), ... also prime. A104213 is primes p with s(p) not prime. A207293 is primes p with s(p) also prime, but not s(s(p)). A213354 is primes p with s(p) and s(s(p)) also prime, but not s(s(s(p))). A213355 is smallest prime p whose k-fold digit sum s(s(..s(p)..)) is also prime for all k < n, but not for k = n.
%H A207294 Charles R Greathouse IV, <a href="/A207294/b207294.txt">Table of n, a(n) for n = 1..10000</a>
%H A207294 G. Harman, <a href="http://www.cs.uwaterloo.ca/journals/JIS/VOL15/Harman/harman2.pdf">Counting Primes whose Sum of Digits is Prime</a>, J. Integer Seq., 15 (2012), Article 12.2.2.
%e A207294 59899999 and s(59899999) = 5+9+8+9+9+9+9+9 = 67 and s(s(59899999)) = s(67) = 6+7 = 13 are all primes, so 59899999 is a member. But s(s(s(59899999))) = s(13) = 1+3 = 4 is not prime, so 59899999 is not a member of A070027.
%t A207294 Select[Prime[Range[200]], PrimeQ[Apply[Plus, IntegerDigits[#]]] && PrimeQ[Apply[Plus, IntegerDigits[Apply[Plus, IntegerDigits[#]]]]] &]
%o A207294 (PARI) select(p->my(s=sumdigits(p));isprime(s)&&isprime(sumdigits(s)), primes(1000)) \\ _Charles R Greathouse IV_, Jun 10 2012
%Y A207294 Cf. A046704, A070027, A104213, A207293, A213354, A213355.
%K A207294 nonn,base
%O A207294 1,1
%A A207294 _Jonathan Sondow_, Jun 09 2012