login
Partial sums of A055612.
3

%I #9 Oct 30 2017 18:01:30

%S 1,3,9,41,391,9103,535951,80825743,31508994061,31937977439061,

%T 84479516648536637,584608936935076469309,10605380482241904040731709,

%U 505256047119225750718027007037,63321087426482869467351750978047037,20908732615936655362731019703436410620989

%N Partial sums of A055612.

%H Robert Israel, <a href="/A293955/b293955.txt">Table of n, a(n) for n = 0..69</a>

%p ListTools:-PartialSums([seq(mul(binomial(n,m)+1,m=1..n),n=0..20)]); # _Robert Israel_, Oct 30 2017

%t Accumulate@ Array[Product[1 + Binomial[#, m], {m, #}] &, 16, 0] (* _Michael De Vlieger_, Oct 30 2017 *)

%Y Cf. A055612, A217716, A293954.

%K nonn

%O 0,2

%A _N. J. A. Sloane_, Oct 30 2017