%I A060719
%S A060719 1,3,9,29,103,405,1753,8279,42293,231949,1357139,8427193,55288873,
%T A060719 381798643,2765917089,20960284293,165729739607,1364153612317,11665484410113,
%U A060719 103448316470743,949739632313501,9013431476894645,88304011710168691
%N A060719 a(0) = 1; a(n+1) = a(n) + Sum_{i=0..n} binomial(n,i)*(a(i)+1).
%F A060719 a(n) = 2*Bell(n+1)-1. - Vladeta Jovovic (vladeta(AT)eunet.rs), Feb 11 
               2003
%p A060719 A060719 := proc(n) option remember; local i; if n=0 then 1 else A060719(n-1)+add(binomial(n-1,
               i)*(A060719(i)+1),i=0..n-1); fi; end;
%Y A060719 Cf. A000110.
%Y A060719 Sequence in context: A109432 A148943 A148944 this_sequence A091152 A148945 
               A136628
%Y A060719 Adjacent sequences: A060716 A060717 A060718 this_sequence A060720 A060721 
               A060722
%K A060719 easy,nonn
%O A060719 0,2
%A A060719 Frank Ellermann (Frank.Ellermann(AT)t-online.de), Apr 23 2001