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 A261556 #39 Aug 19 2019 08:17:31
%S A261556 1,2,3,4,5,6,7,8,9,13,17,54,86,573,768,999,6143,94584,159287,27167549,
%T A261556 40548073,72382636,131092614,340720926,1161216721,2955383683,
%U A261556 3892089702,5304046976,6554754648,72338498624,279445396448,331043595868,466026097373,962499474063,3082891291712
%N A261556 Numbers that divide the sum of the product of the factorials of their digits and the sum of the factorials of their digits.
%e A261556 54 is in the list because 5! = 120, 4! = 24, 120*24=2880, 120+24=144, 2880+144=3024, 3024/54=56.
%t A261556 fQ[n_] := Block[{d = IntegerDigits[n]!}, Mod[Times @@ d + Total@ d, n] == 0]; Select[Range@ 1000000, fQ] (* _Michael De Vlieger_, Aug 26 2015 *)
%o A261556 (PARI) isok(n) = my(d = digits(n)); ((sum(k=1,#d, d[k]!)+prod(k=1,#d, d[k]!)) % n) == 0; \\ _Michel Marcus_, Aug 25 2015
%Y A261556 Cf. A197181, A247227.
%K A261556 nonn,base
%O A261556 1,2
%A A261556 _Paolo Omodei-Zorini_, Aug 24 2015
%E A261556 a(24)-a(25) from _Jon E. Schoenfield_, Aug 24 2015
%E A261556 a(26)-a(30) from _Giovanni Resta_, Aug 26 2015
%E A261556 a(31)-a(34) from _Chai Wah Wu_, May 04 2019
%E A261556 a(35) from _Giovanni Resta_, Aug 19 2019