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.
%I A188264 #16 May 24 2017 09:12:23 %S A188264 1,2,10,11,12,20,30,100,101,102,110,111,112,120,132,200,210,212,220, %T A188264 240,300,312,1000,1001,1002,1010,1011,1012,1020,1032,1100,1101,1102, %U A188264 1104,1110,1111,1112,1120,1200,1210,1212,1220,1320,2000,2010,2012,2020,2100,2110,2112 %N A188264 Numbers m that are divisible by the product of the factorials of their digits in base 10. %H A188264 Reinhard Zumkeller, <a href="/A188264/b188264.txt">Table of n, a(n) for n = 1..1000</a> %e A188264 Number 30 is in sequence because 30 is divisible by the product of factorials 3!*0! = 6. %t A188264 Select[Range[2200],Divisible[#,Times@@(IntegerDigits[#]!)]&] (* _Harvey P. Dale_, May 24 2017 *) %o A188264 (Haskell) %o A188264 import Data.List (elemIndices) %o A188264 a188264 n = a188264_list !! (n-1) %o A188264 a188264_list = %o A188264 map (+ 1) $ elemIndices 0 $ zipWith mod [1..] $ map a066459 [1..] %o A188264 -- _Reinhard Zumkeller_, Oct 11 2011 %Y A188264 Cf. A061602, A066459, A093325. %Y A188264 Cf. A066459, A000142, A197181. %K A188264 nonn,base %O A188264 1,2 %A A188264 _Jaroslav Krizek_, Mar 25 2011