A122757 Process number as a vertex through put triangular product function: m (In)-> {n-states}->m (Out) T(n,m)=m^2*g(n): g(n)=A084221[n].

0, 1, 3, 4, 12, 16, 9, 27, 36, 108, 16, 48, 64, 192, 256, 25, 75, 100, 300, 400, 1200, 36, 108, 144, 432, 576, 1728, 2304, 49, 147, 196, 588, 784, 2352, 3136, 9408, 64, 192, 256, 768, 1024, 3072, 4096, 12288, 16384, 81, 243, 324, 972, 1296, 3888, 5184, 15552

Offset

1,3

Comments

0 1, 3 4, 12, 16 9, 27, 36, 108 16, 48, 64, 192, 256 25, 75, 100, 300, 400, 1200

Links

Table of n, a(n) for n=1..53.

Formula

T(n,m)=m^2*g(n): g(n)=A084221[n]

Mathematica

g[n_] := If[Mod[n, 2] == 0, 2^(n), 2^n + 2^(n - 1)]; t[n_, m_] := m^2*g[n]; a = Table[Table[t[n, m], {n, 0, m}], {m, 0, 10}]; Flatten[a]

Crossrefs

Cf. A084221.

Sequence in context: A047173 A116653 A218967 * A280650 A282458 A360755

Adjacent sequences: A122754 A122755 A122756 * A122758 A122759 A122760

Keyword

nonn,uned

Author

Roger L. Bagula, Sep 21 2006

Status

approved