A187534 Numbers divisible by at least six of their digits, different and >1.

243768, 247968, 248976, 297864, 364728, 367248, 376824, 427896, 428736, 432768, 469728, 478296, 478632, 483672, 623784, 627984, 634872, 689472, 732648, 742896, 746928, 762384, 768432, 789264, 796824, 824376, 836472, 873264, 897624, 927864, 976248, 978264, 1289736, 1293768, 1369872, 1372896, 1376928, 1382976, 1679328, 1679832

Offset

1,1

Comments

There are 1437 terms < 10^7.

Asymptotic density 1/35 = 0.0285.... - Charles R Greathouse IV, Mar 11 2011

Links

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

Mathematica

numdig = 6; Select[Range[1679832], Length[(u = Union[Select[IntegerDigits[#], #1 > 1 &]])] >= numdig && Plus @@ (Boole@Divisible[#, u]) >= numdig &] (* Amiram Eldar, Aug 30 2020 *)

Crossrefs

Subsequence of A187533.

Cf. A187398, A187516, A187238.

Sequence in context: A204950 A244545 A248447 * A140792 A083623 A186801

Adjacent sequences: A187531 A187532 A187533 * A187535 A187536 A187537

Keyword

nonn,base

Author

Zak Seidov, Mar 11 2011

Status

approved