A137603 Numbers m such that product of factorials of digits of m equals sigma(m).

1, 14, 1253, 2261, 2622, 13145, 13630, 20146, 24035, 30362, 31416, 42504, 50424, 63240, 112281, 117124, 126005, 150360, 161160, 225153, 252126, 262105, 318021, 341630, 510632, 611523, 723104, 1071521, 1131190, 1153262, 1200626, 1242108

Offset

1,2

Links

Giovanni Resta, Table of n, a(n) for n = 1..1000

Example

sigma(10230248)=1!*0!*2!*3!*0!*2!*4!*8! so 10230248 is in the sequence.

Mathematica

Select[Range[1250000], Times@@(IntegerDigits[#]!)==DivisorSigma[1, #]&] (* James C. McMahon, Jun 01 2025 *)

Crossrefs

Cf. A066457, A066459, A000203.

Sequence in context: A198712 A204972 A209677 * A160107 A322256 A054004

Adjacent sequences: A137600 A137601 A137602 * A137604 A137605 A137606

Keyword

easy,nonn,base,less

Author

Farideh Firoozbakht, Apr 11 2008

Status

approved