login
A071064
Numbers divisible by the sum of factorials of their digits [A061602(n)] and also terminate in the sum of factorials of their digits.
0
1, 2, 145, 2125, 2310, 3210, 10125, 10234, 10310, 11125, 11310, 12312, 13010, 13110, 13211, 13212, 21312, 23111, 23112, 30010, 30110, 31010, 31110, 31212, 32112, 40585, 52130, 111312, 113112, 131112, 133240, 135250, 153250, 200213
OFFSET
1,2
EXAMPLE
a(8)=10234: 1!+0!+2!+3!+4! = 34 and 10234/34 = 301.
MATHEMATICA
dsfQ[n_]:=Module[{f=Total[IntegerDigits[n]!]}, Divisible[n, f]&&Mod[ n, 10^IntegerLength[f]]==f]; Select[Range[201000], dsfQ] (* Harvey P. Dale, Jul 05 2019 *)
CROSSREFS
Cf. A061602.
Sequence in context: A306955 A228507 A254499 * A265442 A014080 A182478
KEYWORD
base,nonn
AUTHOR
Jason Earls, May 26 2002
STATUS
approved