OFFSET
1,1
COMMENTS
This is an example of a composite number in the sequence which demonstrates that A056709 is a proper subsequence. - R. J. Mathar, Jun 13 2014
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
The divisors of 10201 are {1, 101 & 10201}. Except for 1 each has a 0 in its decimal expansion.
MATHEMATICA
fQ[n_, dgt_] := Union[ MemberQ[#, dgt] & /@ IntegerDigits@ Rest@ Divisors@ n][[1]]; Select[ Range[2, 2030], fQ[#, 0] &]
PROG
(Magma) [m:m in [2..2100] | #[d:d in Divisors(m)|0 in Intseq(d)] eq #Divisors(m)-1]; // Marius A. Burtea, Nov 08 2019
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Barbara W. Waddell and Robert G. Wilson v, Jun 11 2014
STATUS
approved