|
Search: id:A157457
|
|
|
| A157457 |
|
Read n-th row of triangle in A157458 and regard it as the expansion of a number in base n+1. |
|
+0 2
|
|
| 0, 3, 16, 125, 1116, 12943, 182400, 3080025, 60524200, 1357997531, 34237168560, 957927505717, 29446184348868, 986272776455415, 35746439807927296, 1393753996031259953, 58165330905054360720, 2586788074128361802419
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
MATHEMATICA
|
t[n_, m_] =Min[1 + 2*m, 1 + 2*(n - m), n];
Table[FromDigits[{Table[t[n, m], {m, 0, n}], n + 1}, n + 1], {n, 0, 20}]
|
|
CROSSREFS
|
Cf. A139038, A003983, A157458.
Sequence in context: A087018 A005119 A090135 this_sequence A000950 A000951 A000272
Adjacent sequences: A157454 A157455 A157456 this_sequence A157458 A157459 A157460
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Mar 01 2009
|
|
EXTENSIONS
|
Edited by N. J. A. Sloane, Aug 27 2009
|
|
|
Search completed in 0.002 seconds
|