|
%I #4 Jul 04 2014 13:41:38
%S 4,6,8,8,96,64,64,8,64,256,32,128,128,256,64
%N Number of divisors of prime p concatenated p times.
%e Number of divisors of 22 is 4, so the first term is 4.
%e Number of divisors of 333 is 6, so the second term is 6.
%e Number of divisors of 55555 is 8, so the third term is 8.
%t Table[DivisorSigma[0,FromDigits[Flatten[IntegerDigits/@Table[Prime[n],{Prime[n]}]]]],{n,15}] (* _Harvey P. Dale_, Jul 04 2014 *)
%K nonn,base
%O 1,1
%A _Parthasarathy Nambi_, Mar 18 2005
%E More terms from _Harvey P. Dale_, Jul 04 2014
|
