[go: up one dir, main page]

login
A182945
Array of prime powers p^j, as transpose of A182944.
5
2, 3, 4, 5, 9, 8, 7, 25, 27, 16, 11, 49, 125, 81, 32, 13, 121, 343, 625, 243, 64, 17, 169, 1331, 2401, 3125, 729, 128, 19, 289, 2197, 14641, 16807, 15625, 2187, 256, 23, 361, 4913, 28561, 161051, 117649, 78125, 6561, 512, 29, 529, 6859, 83521, 371293, 1771561, 823543, 390625, 19683, 1024
OFFSET
1,1
COMMENTS
The monotonic ordering of this sequence, with 1 prefixed, is A000961.
The joint-rank array of this sequence is A182869.
LINKS
EXAMPLE
Northwest corner:
2 3 5 7
4 9 25 49
8 27 125 343
16 81 625 2401
MAPLE
seq(seq(ithprime(n-i)^i, i=1..n-1), n=2..20); # Robert Israel, Jul 27 2015
MATHEMATICA
width=9; Table[Table[Prime[n]^j, {n, 1, width}, {j, 1, width}]]; Flatten[Table[Table[%[[z-k+1]][[k]], {k, 1, z}], {z, 1, width}]]
PROG
(Magma) [NthPrime(n-i)^i: i in [1..n-1], n in [2..15]]; // Vincenzo Librandi, Jul 28 2015
CROSSREFS
Cf. A000961, A182944, A000040 (row 1), A001248 (row 2), A030078 (row 3).
Antidiagonal products give A006939.
Cf. A319075 (extends the array with 0th powers).
Sequence in context: A284311 A357581 A174225 * A360069 A052270 A265335
KEYWORD
nonn,tabl
AUTHOR
Clark Kimberling, Dec 14 2010
STATUS
approved