A092787 Primes in the sequence A005349 - 1.

2, 3, 5, 7, 11, 17, 19, 23, 29, 41, 47, 53, 59, 71, 79, 83, 89, 101, 107, 109, 113, 131, 139, 149, 151, 179, 191, 197, 199, 223, 227, 229, 233, 239, 251, 263, 269, 307, 311, 359, 401, 409, 419, 431, 439, 443, 449, 467, 479, 499, 503, 509, 521, 557, 587, 593, 599

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

nivenQ[n_] := Divisible[n, Plus @@ IntegerDigits[n]]; Select[Range[600], PrimeQ[#] && nivenQ[# + 1] &] (* Amiram Eldar, Dec 05 2021 *)

Crossrefs

Cf. A005349.

Sequence in context: A162566 A040085 A040049 * A181562 A095365 A042989

Adjacent sequences: A092784 A092785 A092786 * A092788 A092789 A092790

Keyword

easy,nonn,base

Author

Jorge Coveiro, Apr 14 2004

Extensions

More terms from Pab Ter (pabrlos(AT)yahoo.com), May 24 2004

Status

approved