[go: up one dir, main page]

login
A092787
Primes in the sequence A005349 - 1.
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
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
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