cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A187551 Numbers divisible by at least seven of their digits, different and >1.

This page as a plain text file.
%I A187551 #15 Aug 30 2020 04:25:20
%S A187551 23469768,23579640,23594760,23674896,23684976,23687496,23745960,
%T A187551 23746968,23769648,23796864,23876496,23897664,23947560,23957640,
%U A187551 23976540,24367896,24375960,24376968,24539760,24679368,24687936,24753960,24783696,24869376,24876936,25497360,25639740,25749360,25793460,25967340
%N A187551 Numbers divisible by at least seven of their digits, different and >1.
%C A187551 There are 708 terms < 10^8.
%C A187551 Asymptotic density 1/180 = 0.00555.... - _Charles R Greathouse IV_, Mar 11 2011
%H A187551 Amiram Eldar, <a href="/A187551/b187551.txt">Table of n, a(n) for n = 1..10000</a>
%t A187551 numdig = 7; Select[Range[25967340], Length[(u = Union[Select[IntegerDigits[#], #1 > 1 &]])] >= numdig && Plus @@ (Boole@Divisible[#, u]) >= numdig &] (* _Amiram Eldar_, Aug 30 2020 *)
%Y A187551 Subsequence of A187534.
%Y A187551 Cf. A187398, A187516, A187238, A187533.
%K A187551 nonn,base
%O A187551 1,1
%A A187551 _Zak Seidov_, Mar 11 2011