|
| |
|
|
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
| |
|
|
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
(list; graph; refs; listen; history; internal format)
|
|
|
|
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
|
|
|
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: A124637 A047173 A116653 * A084221 A142866 A026847
Adjacent sequences: A122754 A122755 A122756 * A122758 A122759 A122760
|
|
|
KEYWORD
| nonn,uned
|
|
|
AUTHOR
| Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 21 2006
|
| |
|
|
