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!)
A320009 a(0) = 1; for n > 0, a(n) = A000005(n) * a(n-A000005(n)), where A000005(n) gives the number of divisors of n. 5
1, 1, 2, 2, 3, 4, 8, 8, 12, 24, 32, 48, 48, 96, 128, 192, 240, 384, 288, 768, 768, 1536, 1152, 3072, 1920, 3456, 4608, 12288, 6912, 24576, 9216, 49152, 27648, 98304, 36864, 196608, 110592, 393216, 147456, 786432, 221184, 1572864, 294912, 3145728, 884736, 4718592, 1179648, 9437184, 1474560, 3538944, 5308416, 37748736, 7077888, 75497472 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
LINKS
FORMULA
a(0) = 1; for n > 0, a(n) = A000005(n) * a(n-A000005(n)).
MATHEMATICA
Nest[Append[#1, #2 #1[[-#2]] ] & @@ {#, DivisorSigma[0, Length@ #]} &, {1}, 53] (* Michael De Vlieger, Nov 25 2018 *)
PROG
(PARI) A320009(n) = if(0==n, 1, numdiv(n)*A320009(n-numdiv(n)));
CROSSREFS
Cf. also A320002, A320008, A320016.
Sequence in context: A302487 A032252 A112708 * A147558 A032243 A153922
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 24 2018
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 18 21:02 EDT 2024. Contains 370951 sequences. (Running on oeis4.)