The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A202239 n such that the sum of the factorials of the digits of n equals the sum of d|n, 1
 620, 13407, 66061, 266533, 282401, 416641, 3507607, 7036153, 7622243, 10327663, 17735167, 34802143, 57653483, 86357113, 86546363, 91203611, 112777747, 121825337, 124283381, 127316869, 176080309, 216687451, 218172511, 231811037, 243238447, 263364883, 272368301 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Table of n, a(n) for n=1..27. FORMULA {n: A061602(n)= A048050(n)}. - R. J. Mathar, Dec 18 2011 EXAMPLE 620 is in the sequence because 6! + 2! + 0! = 720 + 2 + 1 = 723, and sum of the divisors 1< d< n = sigma(620) - n - 1 = 1344 - 620 - 1 = 723. MAPLE isA202239 := proc(n) A061602(n) = A048050(n) ; end proc: for n from 1 do if isA202239(n) then print(n) ; end if; end do; # R. J. Mathar, Dec 18 2011 MATHEMATICA Q[n_]:=Module[{a=Total[Rest[Most[Divisors[n]]]]}, a == Total[IntegerDigits[n]!]]; Select[Range[2, 10^8], Q] CROSSREFS Cf. A000142, A061602, A048050. Sequence in context: A133207 A182351 A335961 * A010031 A252527 A232422 Adjacent sequences: A202236 A202237 A202238 * A202240 A202241 A202242 KEYWORD nonn,base AUTHOR Michel Lagneau, Dec 16 2011 EXTENSIONS a(17)-a(27) from Donovan Johnson, Jan 14 2012 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 20 22:14 EDT 2024. Contains 371848 sequences. (Running on oeis4.)