|
%I #5 Sep 10 2019 12:25:31
%S 1,3,4,10,17,62,205,894,4147,21183,115977,678700,4213599,27644849,
%T 190899360,1382960323,10480142149,82864878205,682076806161,
%U 5832742247416,51724158235786,474869816388707,4506715738447325
%N Dirichlet convolution of d(n) (# of divisors) with Bell numbers.
%t Table[Sum[BellB[n/d - 1]*DivisorSigma[0, d], {d, Divisors[n]}], {n, 1, 25}] (* _Vaclav Kotesovec_, Sep 10 2019 *)
%K nonn
%O 1,2
%A _Erich Friedman_
|
