A158473 Primes whose digit sum contains one or more digits of the same prime.

2, 3, 5, 7, 19, 109, 127, 137, 139, 149, 157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 271, 281, 283, 307, 317, 337, 347, 367, 373, 379, 397, 419, 461, 463, 467, 491, 541, 557, 571, 613, 617, 619, 631, 641, 643, 647, 661, 673, 691, 719, 733, 739, 743, 751

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Chris Caldwell, The First 1,000 Primes

Example

139 is a prime whose digit sum of 13 contains the digits 1 and 3 which are also in the prime.
149 is a prime whose digit sum of 14 contains the digits 1 and 4 which are also in the prime.
419 is a prime whose digit sum of 14 contains the digits 1 and 4 which are also in the prime.

Maple

filter:= proc(n) local L, s;
  L:= convert(n, base, 10);
  s:= convert(L, `+`);
  convert(convert(s, base, 10), set) intersect convert(L, set) <> {}
end proc:
select(filter, [seq(ithprime(i), i=1..100)]); # Robert Israel, Feb 27 2023

Prog

(PARI) isok(p) = isprime(p) && (#setintersect(Set(digits(p)), Set(digits(sumdigits(p)))) >= 1); \\ Michel Marcus, Nov 12 2017

Crossrefs

Cf. A107579, A158217, A158293.

Sequence in context: A289756 A236303 A117315 * A048420 A048405 A110457

Adjacent sequences: A158470 A158471 A158472 * A158474 A158475 A158476

Keyword

base,nonn

Author

Parthasarathy Nambi, Mar 20 2009

Extensions

Single-digit primes added by R. J. Mathar, Jul 08 2009

Typos in data corrected by D. S. McNeil and Andrew Weimholt, Aug 17 2010

Status

approved