A095890 Triangle read by rows: T(n,k) = (n-k+1)^(n-k), n>=1, 1<=k<=n.
1, 2, 1, 9, 2, 1, 64, 9, 2, 1, 625, 64, 9, 2, 1, 7776, 625, 64, 9, 2, 1, 117649, 7776, 625, 64, 9, 2, 1, 2097152, 117649, 7776, 625, 64, 9, 2, 1, 43046721, 2097152, 117649, 7776, 625, 64, 9, 2, 1, 1000000000, 43046721, 2097152, 117649, 7776, 625, 64, 9, 2, 1
Offset: 1
Links
- Reinhard Zumkeller, Rows n = 1..120 of triangle, flattened
Programs
-
Haskell
a095890 n k = (n - k + 1) ^ (n - k) a095890_row n = map (a095890 n) [1..n] a095890_tabl = map a095890_row [1..] -- Reinhard Zumkeller, Jul 07 2013
-
Mathematica
Table[(n-k+1)^(n-k),{n,10},{k,n}]//Flatten (* Harvey P. Dale, Sep 06 2022 *)