A122757 - OEIS

%I #4 Mar 12 2014 16:36:58

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

%T 108,144,432,576,1728,2304,49,147,196,588,784,2352,3136,9408,64,192,

%U 256,768,1024,3072,4096,12288,16384,81,243,324,972,1296,3888,5184,15552

%N 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].

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

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

%t 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]

%Y Cf. A084221.

%K nonn,uned

%O 1,3

%A _Roger L. Bagula_, Sep 21 2006