%I #20 Jan 27 2025 02:26:58
%S 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,
%T 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,
%U 38,14,38,14,14,2,302,2,14,26,7,14,158,2,26,14,158,2,72,2,14
%N a(n) = (tau(n^11)+10)/11.
%H Antti Karttunen, <a href="/A016007/b016007.txt">Table of n, a(n) for n = 1..10000</a>
%p A016007:=n->(numtheory[tau](n^11)+10)/11: seq(A016007(n), n=1..160); # _Wesley Ivan Hurt_, Apr 26 2017
%t a[n_] := (DivisorSigma[0, n^11] + 10)/11; Array[a, 100] (* _Amiram Eldar_, Jan 27 2025 *)
%o (PARI)
%o A016007(n) = (numdiv(n^11)+10)/11;
%o for(n=1, 10000, write("b016007.txt", n, " ", A016007(n)));
%o \\ _Antti Karttunen_, Jan 17 2017
%Y Cf. A000005, A015996, A015999, A016001, A016002, A016003, A016005, A016006, A016008, A016009, A016012.
%K nonn
%O 1,2
%A _Robert G. Wilson v_
%E Definition corrected by _Vladeta Jovovic_, Sep 03 2005