A092821 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}].

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, 197, 65, 64, 1, 50, 449, 1184, 1009, 274, 113, 128, 1, 65, 793, 3033, 4153, 1913, 289, 225, 256, 1, 82, 1306, 6850, 13906, 10882, 2650, 274, 481, 512, 1, 101, 2036, 14036

Offset

0,3

Comments

Last column is 2^n, row sums are A092822.

Links

Table of n, a(n) for n=0..58.

Example

Table starts 1, 1,2 1,5,4 1,10,13,8

Mathematica

Table[(# Conjugate[ # ]&)@ Sum[Binomial[n, t] I^t, {t, 0, k}], {n, 0, 7}, {k, 0, n}]

Crossrefs

Cf. A092822.

Sequence in context: A126351 A157011 A246173 * A238241 A299444 A371300

Adjacent sequences: A092818 A092819 A092820 * A092822 A092823 A092824

Keyword

easy,nonn,tabl

Author

Wouter Meeussen, Mar 06 2004

Status

approved