%I #21 Nov 12 2018 03:01:38
%S 516493,1056493,1427383,1885943,3166183,3805183,4241593,6621283,
%T 7646953,12912283,17987839,32106493,107152093,120224773,131144473,
%U 133210873,139388891,142782877,150326173,155382923,177865819,184081943,227795839,242376877,264174877
%N Primes for which only five iterations of 'Prime plus its digit sum equals a prime' are possible.
%H Lars Blomberg, <a href="/A048527/b048527.txt">Table of n, a(n) for n = 1..3000</a>
%e 516493 -> 516521 -> 516541 -> 516563 -> 516589 -> 516623 -> next iteration yields a composite.
%o (PARI) forprime(p=2,,isprime(pp=A062028(p))&& !for(i=2,5,isprime(pp=A062028(pp))||next(2))&& !isprime(A062028(pp))&& print1(p",")) \\ _M. F. Hasler_, Nov 08 2018
%Y Cf. A047791, A048519, A062028 (n + digit sum of n).
%Y Cf. A048523, A048524, A048525, A048526.
%K nonn,base
%O 1,1
%A _Patrick De Geest_, May 15 1999
%E Offset changed to 1 and a(15)-a(24) from _Lars Blomberg_, Dec 04 2013
|