login
A187533
Numbers divisible by at least five of their digits, different and >1.
8
27384, 29736, 36792, 37296, 37926, 38472, 46872, 73248, 73962, 78624, 79632, 84672, 92736, 123648, 123864, 123984, 124368, 126384, 129384, 132648, 132864, 132984, 134928, 136248, 136824, 138264, 138624, 139248, 139824, 142368, 143928, 146328, 146832, 148392, 148632, 149328, 149832, 162384, 163248, 163824, 164328, 164832, 167328, 167832, 168432, 172368, 183264, 183624, 184392, 184632, 186432, 189432, 192384, 193248, 193824, 194328
OFFSET
1,1
COMMENTS
There are 11936 terms < 4*10^6.
Asymptotic density 97/1260 = 0.0769.... - Charles R Greathouse IV, Mar 11 2011
LINKS
MATHEMATICA
numdig = 5; Select[Range[194328], Length[(u = Union[Select[IntegerDigits[#], #1 > 1 &]])] >= numdig && Plus @@ (Boole@Divisible[#, u]) >= numdig &] (* Amiram Eldar, Aug 30 2020 *)
CROSSREFS
Subsequence of A187238.
Sequence in context: A224626 A237296 A166224 * A321159 A236503 A251437
KEYWORD
nonn,base
AUTHOR
Zak Seidov, Mar 11 2011
STATUS
approved