A214837 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A214837

Primes not expressible as the sum of a prime and its digit sum.

2, 3, 5, 7, 11, 19, 23, 31, 37, 41, 43, 53, 59, 67, 71, 89, 97, 101, 109, 127, 131, 139, 149, 151, 157, 167, 179, 193, 197, 199, 211, 223, 227, 229, 233, 239, 251, 257, 263, 269, 277, 283, 311, 313, 331, 337, 347, 349, 353, 359, 367, 373, 379, 389, 401, 419

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Primes not in A048520.

LINKS

Table of n, a(n) for n=1..56.

EXAMPLE

19 is in the list since there exists no prime p such that p+digit sum of p = 19.

MATHEMATICA

primeList = Prime[Range[81]]; Complement[primeList, Sort[Select[Table[p + Total[IntegerDigits[p]], {p, primeList}], PrimeQ]]]

CROSSREFS