A081983 - OEIS

A081983

Primes p such that p-1 is divisible by every nonzero digit of p.

11, 13, 19, 31, 41, 61, 71, 101, 103, 109, 127, 151, 163, 199, 211, 223, 241, 251, 281, 313, 331, 337, 379, 401, 421, 433, 521, 541, 601, 613, 631, 661, 673, 701, 881, 919, 991, 1009, 1021, 1033, 1051, 1063, 1123, 1151, 1201, 1213, 1231, 1303, 1321, 1481

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

OFFSET

1,1

LINKS

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

EXAMPLE

127 is a member as 126 is divisible by 1, 2 and 7.

MATHEMATICA

Select[Prime[Range[250]], And@@Divisible[#-1, Select[IntegerDigits[ #], #!=0&]]&] (* Harvey P. Dale, Apr 14 2018 *)

CROSSREFS

Cf. A081981, A081982, A081984, A081986, A081987.

Sequence in context: A050265 A176871 A092402 * A081984 A145482 A167497