login
a(n) = (tau(n^8)+7)/8.
14

%I #12 Sep 22 2020 16:22:28

%S 1,2,2,3,2,11,2,4,3,11,2,20,2,11,11,5,2,20,2,20,11,11,2,29,3,11,4,20,

%T 2,92,2,6,11,11,11,37,2,11,11,29,2,92,2,20,20,11,2,38,3,20,11,20,2,29,

%U 11,29,11,11,2,173,2,11,20,7,11,92,2,20,11,92,2,54,2,11,20,20

%N a(n) = (tau(n^8)+7)/8.

%H Antti Karttunen, <a href="/A016003/b016003.txt">Table of n, a(n) for n = 1..10000</a>

%t Table[(DivisorSigma[0,n^8]+7)/8,{n,80}] (* _Harvey P. Dale_, Sep 22 2020 *)

%o (PARI)

%o A016003(n) = (numdiv(n^8)+7)/8;

%o for(n=1, 10000, write("b016003.txt", n, " ", A016003(n)));

%o \\ _Antti Karttunen_, Jan 17 2017

%Y Cf. A000005, A015996, A015999, A016001, A016002, A016005-A016009, A016012.

%K nonn

%O 1,2

%A _Robert G. Wilson v_

%E Definition corrected by Vladeta Jovovic, Sep 03 2005