login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A048523 Primes for which only one iteration of 'Prime plus its digit sum equals a prime' is possible. 8
13, 19, 37, 53, 71, 73, 97, 103, 127, 163, 181, 233, 271, 307, 383, 389, 431, 433, 499, 509, 563, 587, 631, 701, 743, 787, 811, 857, 859, 947, 1009, 1049, 1061, 1087, 1153, 1171, 1223, 1283, 1423, 1483, 1489, 1553, 1597, 1601, 1607, 1733, 1801, 1861, 1867 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Sequence A048519 lists the primes for which at least (rather than exactly) one iteration of A062028 is "possible". See A048524 .. A048527 and A320878 .. A320880 for further subsequences, and A090009 for the list of their initial terms, starting chains of length >= 3 .. 9. - M. F. Hasler, Nov 09 2018

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

EXAMPLE

prime 1999 -> 1999 + (1+9+9+9) = prime 2027 -> next iteration yields composite 2038.

MATHEMATICA

ppd1Q[n_]:=PrimeQ[Rest[NestList[#+Total[IntegerDigits[#]]&, n, 2]]] == {True, False}; Select[Prime[Range[300]], ppd1Q] (* Harvey P. Dale, Nov 10 2011 *)

CROSSREFS

Cf. A047791, A048519.

Sequence in context: A057749 A040070 A322923 * A307627 A000922 A107188

Adjacent sequences:  A048520 A048521 A048522 * A048524 A048525 A048526

KEYWORD

nonn,base

AUTHOR

Patrick De Geest, May 15 1999

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 20 04:04 EDT 2020. Contains 337264 sequences. (Running on oeis4.)