|
%I #10 Oct 30 2017 18:01:23
%S 1,4,26,318,8362,518136,79762944,31347878526,31875040276682,
%T 84415672202652576,584440009839756835096,10604211348847550536329728,
%U 505234836942870203845022012928,63320076924994011498092218964764672,20908605974267058444111310750652481533952
%N First differences of A055612.
%H Robert Israel, <a href="/A293954/b293954.txt">Table of n, a(n) for n = 0..68</a>
%p A055612:= n -> mul(binomial(n,m)+1,m=1..n):
%p seq(A055612(n+1)-A055612(n),n=0..20); # _Robert Israel_, Oct 30 2017
%t Differences@ Array[Product[1 + Binomial[#, m], {m, #}] &, 16, 0] (* _Michael De Vlieger_, Oct 30 2017 *)
%Y Cf. A055612, A217716, A293955.
%K nonn
%O 0,2
%A _N. J. A. Sloane_, Oct 30 2017, following a suggestion from _Joerg Arndt_.
|
