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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A073575 Sum of factorial numbers dividing n. 3
1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 33, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 33, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 33, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 9, 1, 3, 1, 3, 1, 33, 1, 3, 1, 3, 1, 9 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
FORMULA
G.f.: Sum_{k>0} k!*x^(k!)/(1-x^(k!)). - Vladeta Jovovic, Dec 13 2002
a(n) = A007489(A055881(n)). - Antti Karttunen, Dec 19 2018
MATHEMATICA
Table[Total[Select[Table[i!, {i, n}], Divisible[n, #] &]], {n, 102}] (* Jayanta Basu, Jul 01 2013 *)
PROG
(PARI) A073575(n) = { my(m=1, i=2, s=0); while(!(n%m), s += m; m *= i; i++); return(s); } \\ Antti Karttunen, Dec 19 2018
CROSSREFS
Sequence in context: A016572 A072860 A068503 * A363533 A146431 A212183
KEYWORD
nonn
AUTHOR
Vladeta Jovovic, Aug 27 2002
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 07:48 EDT 2024. Contains 371235 sequences. (Running on oeis4.)