%I #2 Mar 31 2012 13:20:27
%S 4,8,83,2296,10861936,1411410779,60443686054995,18373508669927544,
%T 3194533046674386845000,858410779506468749371519333771,
%U 745094155915562576848262528092832
%N Logarithmic numbers A002104[p+1] divided by p=Prime[n].
%F a(n) = Sum[Sum[m!/k!,{k,0,m}],{m,0,Prime[n]}]/Prime[n]. a(n) = A002104[p+1]/p, where p=Prime[n].
%t Table[Sum[Sum[m!/k!,{k,0,m}],{m,0,Prime[n]}]/Prime[n],{n,1,15}]
%Y Cf. A002104, A000522.
%K nonn
%O 1,1
%A _Alexander Adamchuk_, Jul 05 2006
|