login
a(p) = (b(p)-2)/p where b(k) denotes the k-th Bell number and p runs through the prime numbers.
3

%I #13 Nov 23 2019 04:04:38

%S 0,1,10,125,61688,2126495,4874404106,306986431845,1919652428481928,

%T 2459993170305526730730,332043836975044402745021,

%U 1428874762393255348701231773647,57345183115624820200016928713263146

%N a(p) = (b(p)-2)/p where b(k) denotes the k-th Bell number and p runs through the prime numbers.

%H Amiram Eldar, <a href="/A079609/b079609.txt">Table of n, a(n) for n = 1..106</a>

%F a(p) = ((Sum_{k>=0} k^p/k!)/e-2)/p.

%t Table[(BellB[(p = Prime[i])] - 2)/p, {i, 1, 10}] (* _Amiram Eldar_, Nov 23 2019 *)

%Y Cf. A000110.

%K nonn

%O 1,3

%A _Benoit Cloitre_, Jan 28 2003