login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A344336
Number of divisors of n^9.
2
1, 10, 10, 19, 10, 100, 10, 28, 19, 100, 10, 190, 10, 100, 100, 37, 10, 190, 10, 190, 100, 100, 10, 280, 19, 100, 28, 190, 10, 1000, 10, 46, 100, 100, 100, 361, 10, 100, 100, 280, 10, 1000, 10, 190, 190, 100, 10, 370, 19, 190, 100, 190, 10, 280, 100, 280, 100, 100, 10, 1900, 10, 100
OFFSET
1,2
LINKS
FORMULA
a(n) = A000005(A001017(n)).
Multiplicative with a(p^e) = 9*e+1.
a(n) = Sum_{d|n} 9^omega(d).
G.f.: Sum_{k>=1} 9^omega(k) * x^k/(1 - x^k).
Dirichlet g.f.: zeta(s)^2 * Product_{primes p} (1 + 8/p^s). - Vaclav Kotesovec, Aug 19 2021
MATHEMATICA
Table[DivisorSigma[0, n^9], {n, 1, 100}] (* Amiram Eldar, May 15 2021 *)
PROG
(PARI) a(n) = numdiv(n^9);
(PARI) a(n) = prod(k=1, #f=factor(n)[, 2], 9*f[k]+1);
(PARI) a(n) = sumdiv(n, d, 9^omega(d));
(PARI) my(N=99, x='x+O('x^N)); Vec(sum(k=1, N, 9^omega(k)*x^k/(1-x^k)))
(PARI) for(n=1, 100, print1(direuler(p=2, n, (1 + 8*X)/(1 - X)^2)[n], ", ")) \\ Vaclav Kotesovec, Aug 19 2021
CROSSREFS
Column k=9 of A343656.
Cf. A000005, A001017, A344337 (9^omega(n)).
Sequence in context: A352314 A363328 A047879 * A168416 A141324 A097041
KEYWORD
nonn,mult
AUTHOR
Seiichi Manyama, May 15 2021
STATUS
approved