|
| |
|
|
A122758
|
|
Triangle read by rows: T(n,m) = 2*n^2*A084221(n) (n>=0, 0 <= m <= n).
|
|
0
| |
|
|
0, 2, 6, 8, 24, 32, 18, 54, 72, 216, 32, 96, 128, 384, 512, 50, 150, 200, 600, 800, 2400, 72, 216, 288, 864, 1152, 3456, 4608, 98, 294, 392, 1176, 1568, 4704, 6272, 18816, 128, 384, 512, 1536, 2048, 6144, 8192, 24576, 32768, 162, 486, 648, 1944, 2592, 7776
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| Triangle begins:
0
2, 6
8, 24, 32
18, 54, 72, 216
32, 96, 128, 384, 512
50, 150, 200, 600, 800, 2400
|
|
|
MATHEMATICA
| f[n_] := If[Mod[n, 2] == 0, 2^(n + 1), 2^n + 2^(n + 1)]; T[n_, m_] := m^2*f[n]; a = Table[Table[T[n, m], {n, 0, m}], {m, 0, 10}]; Flatten[a]
|
|
|
CROSSREFS
| Cf. A084221.
Sequence in context: A153802 A068496 A081957 * A122756 A193946 A189850
Adjacent sequences: A122755 A122756 A122757 * A122759 A122760 A122761
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 21 2006
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane, Jun 23 2009
|
| |
|
|
