|
|
A182946
|
|
Array of odd prime powers p^j, where j>=1, by antidiagonals.
|
|
1
|
|
|
3, 9, 5, 27, 25, 7, 81, 125, 49, 11, 243, 625, 343, 121, 13, 729, 3125, 2401, 1331, 169, 17, 2187, 15625, 16807, 14641, 2197, 289, 19, 6561, 78125, 117649, 161051, 28561, 4913, 361, 23, 19683, 390625, 823543, 1771561, 371293, 83521, 6859, 529, 29
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
width=9; Transpose[Table[Table[Prime[n+1]^j, {n, 1, width}, {j, 1, width}]]]; Flatten[Table[Table[%[[z-k+1]][[k]], {k, 1, z}], {z, 1, width}]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|