login
Upper triangular region of the table A073346.
3

%I #3 May 01 2014 02:47:51

%S 1,1,0,0,2,0,1,0,4,0,0,2,4,8,0,0,2,8,16,16,0,0,0,12,40,48,32,0,1,0,12,

%T 80,144,128,64,0,0,2,12,136,384,448,320,128,0,0,2,12,224,912,1408,

%U 1280,768,256,0,0,0,20,328,2048,4096,4544,3456,1792,512,0,0,2,16,480,4336

%N Upper triangular region of the table A073346.

%p A073430 := n -> A073346bi(A003056(n), A002262(n));

%p A002262 := n -> n - binomial(floor((1/2)+sqrt(2*(1+n))),2);

%p A003056 := n -> floor(sqrt(2*(1+n))-(1/2));

%K nonn,tabl

%O 0,5

%A _Antti Karttunen_, Jul 31 2002