|
| |
|
|
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
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
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
|
Robert Israel, Table of n, a(n) for n = 1..10000
|
|
|
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).
A319075 extends the array with 0th powers.
Sequence in context: A284311 A357581 A174225 * A360069 A052270 A265335
Adjacent sequences: A182942 A182943 A182944 * A182946 A182947 A182948
|
|
|
KEYWORD
|
nonn,tabl
|
|
|
AUTHOR
|
Clark Kimberling, Dec 14 2010
|
|
|
STATUS
|
approved
|
| |
|
|
