|
%I #12 Dec 16 2013 02:26:55
%S 3,2,2,3,2,4,2,4,3,2,4,4,2,6,3,4,2,6,4,2,6,5,4,4,6,2,8,2,4,4,4,4,2,4,
%T 2,6,4,8,3,6,2,4,2,8,2,4,4,9,2,8,4,2,6,4,4,4,2,8,6,2,8,4,4,2,12,4,6,4,
%U 2,8,4,3,6,8,4,8,4,8,4,4,2,6,2,8,9,4,4,8,2,8,4,4,4,4,4,4,4,2,12,4,6,4,4
%N Number of divisors of prime(n) + 2.
%e 10th term is a(10) = d(prime(10)+2) = d(29+2) = d(29) = 2 .
%t Table[DivisorSigma[0,Prime[n]+2],{n,1,103}]
%o (PARI) a(n) = numdiv(prime(n)+2); \\ _Michel Marcus_, Dec 15 2013
%K nonn
%O 1,1
%A _Labos Elemer_
|
