%I #14 Nov 23 2019 04:05:24
%S 1,1,1,6,24,14,240,878,1872,34560,143840,542880,4421376,27644438,
%T 97250652,1666163520,10523628456,30946448412,779556556800,
%U 5873176163328,15288823623792,633207380826720,6399554302310400,22325251164046200,594616643557427040,5146116019164933120
%N Sum of odd divisors of Bell(n).
%H Amiram Eldar, <a href="/A280589/b280589.txt">Table of n, a(n) for n = 0..104</a> (terms 1..70 from Vincenzo Librandi)
%F a(n) = A000593(A000110(n)).
%t a[n_]:=Select[Divisors[BellB[n]], OddQ]//Total; Table[a[n], {n, 0, 40}]
%Y Cf. A000110, A000593, A280638.
%K nonn
%O 0,4
%A _Vincenzo Librandi_, Jan 07 2017
%E Offset 0 and a(0) added by _Amiram Eldar_, Nov 23 2019