login
A157452
Number generated by regarding the numbers in row n of A003983 as digits of a base n number.
0
1, 3, 16, 105, 961, 11137, 160000, 2738385, 54479161, 1234554321, 31384248336, 884241045961, 27342890695849, 920521266133785, 33512287502995456, 1311768467139281697, 54933923639963082961, 2450641333396432006369
OFFSET
1,2
COMMENTS
We are regarding A003983 as a triangle, not as an array by antidiagonals.
FORMULA
t(n,m)=Min[1 + m, 1 + (n - m)]; a(n)=FromDigits[{Table[t[n, m], {m, 0, n}], n + 1}, n + 1].
EXAMPLE
Row 4 of A003983 is 1,2,2,1. The number 1221 in base 4 is 4^3 + 2*4^2 + 2*4 + 1 = 105, so a(4) = 105.
MATHEMATICA
t[n_, m_] =Min[m, n - m + 1];
Table[FromDigits[{Table[t[n, m], {m, 1, n}], n}, n], {n, 1, 21}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Roger L. Bagula, Mar 01 2009
EXTENSIONS
Edited by Franklin T. Adams-Watters, Sep 25 2011
STATUS
approved