%I #5 May 19 2018 12:55:48

%S 0,1,0,1,1,3,5,12,24,56,123,292,682,1667,4079,10288,26159,68026,

%T 178823,478659,1296271,3564911,9919320,27978084,79816424,230520511,

%U 673071482,1987599262,5930739339,17883932293,54464027956,167512285647,520076498672,1629804156975

%N Number of partitions of n that contain exactly one isolated singleton.

%H A. O. Munagi, <a href="https://doi.org/10.1080/00029890.2018.1430960">Set partitions with isolated singletons</a>, Am. Math. Monthly 125 (2018), 447-452.

%p f:=proc(n,r) local j;

%p add(combinat:-bell(j-1)*binomial(n-j-1,j-r-1),j=1..floor((n+r)/2));

%p end;

%p [seq(f(n,1),n=1..40)];

%Y Cf. A303586, A303588.

%K nonn

%O 1,6

%A _N. J. A. Sloane_, May 19 2018