|
%I #4 Mar 30 2012 18:37:44
%S 1,1,2,1,5,4,1,10,13,8,1,17,41,25,16,1,26,106,106,41,32,1,37,232,392,
%T 197,65,64,1,50,449,1184,1009,274,113,128,1,65,793,3033,4153,1913,289,
%U 225,256,1,82,1306,6850,13906,10882,2650,274,481,512,1,101,2036,14036
%N Table read by rows: T(n,k)= z (z') or product of z with its complex conjugate, with z=Sum[binomial[n,t] I^t, {t,0,k}].
%C Last column is 2^n, row sums are A092822.
%e Table starts 1, 1,2 1,5,4 1,10,13,8
%t Table[(# Conjugate[ # ]&)@ Sum[Binomial[n, t] I^t, {t, 0, k}], {n, 0, 7}, {k, 0, n}]
%Y Cf. A092822.
%K easy,nonn,tabl
%O 0,3
%A _Wouter Meeussen_, Mar 06 2004
|
