A016007 a(n) = (tau(n^11)+10)/11.

1, 2, 2, 3, 2, 14, 2, 4, 3, 14, 2, 26, 2, 14, 14, 5, 2, 26, 2, 26, 14, 14, 2, 38, 3, 14, 4, 26, 2, 158, 2, 6, 14, 14, 14, 49, 2, 14, 14, 38, 2, 158, 2, 26, 26, 14, 2, 50, 3, 26, 14, 26, 2, 38, 14, 38, 14, 14, 2, 302, 2, 14, 26, 7, 14, 158, 2, 26, 14, 158, 2, 72, 2, 14

Offset: 1

Author

Robert G. Wilson v

Keywords

• nonn

Links

• Antti Karttunen, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000005, A015996, A015999, A016001, A016002, A016003, A016005, A016006, A016008, A016009, A016012.

Programs

Maple

A016007:=n->(numtheory[tau](n^11)+10)/11: seq(A016007(n), n=1..160); # Wesley Ivan Hurt, Apr 26 2017

Mathematica

a[n_] := (DivisorSigma[0, n^11] + 10)/11; Array[a, 100] (* Amiram Eldar, Jan 27 2025 *)

PARI

A016007(n) = (numdiv(n^11)+10)/11;
for(n=1, 10000, write("b016007.txt", n, " ", A016007(n)));
\\ Antti Karttunen, Jan 17 2017

Extensions

Definition corrected by Vladeta Jovovic, Sep 03 2005