%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