OFFSET
1,3
COMMENTS
LINKS
T. D. Noe, Rows n = 1..50 of triangle, flattened
FORMULA
a(n) = (n - b(n) * (b(n) - 1) / 2)^(b(n) * (b(n) + 1) / 2 - n + 1), where b(n) = [ 1/2 + sqrt(2 * n) ]. (b(n) is the n-th term of A002024.) - Robert A. Stump (bee_ess107(AT)yahoo.com), Aug 29 2002
EXAMPLE
1 2 3 4 5 6 7
1 4 9 16 25 36 49
1 8 27 64 125 216 343
1 16 81 256 625 1296 2401
1 32 243 1024 3125 7776 16807
1 64 729 4096 15625 46656 117649
1 128 2187 16384 78125 279936 823543
MAPLE
T:= (n, k)-> k^n:
seq(seq(T(1+d-k, k), k=1..d), d=1..11); # Alois P. Heinz, Apr 18 2020
MATHEMATICA
Table[ k^(n-k+1), {n, 1, 12}, {k, 1, n}] // Flatten (* Jean-François Alcover, Nov 30 2012 *)
PROG
(Haskell)
a051129 n k = k ^ (n - k)
a051129_row n = a051129_tabl !! (n-1)
a051129_tabl = zipWith (zipWith (^)) a002260_tabl $ map reverse a002260_tabl
-- Reinhard Zumkeller, Sep 14 2014
(PARI) b(n) = floor(1/2 + sqrt(2 * n));
vector(100, n, (n - b(n) * (b(n) - 1) / 2)^(b(n) * (b(n) + 1) / 2 - n + 1)) \\ Altug Alkan, Dec 09 2015
CROSSREFS
KEYWORD
AUTHOR
EXTENSIONS
More terms from James A. Sellers, Dec 11 1999
STATUS
approved