login
Logarithmic numbers A002104[p+1] divided by p=Prime[n].
0

%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