|
| |
|
|
A182870
|
|
Joint-rank array of odd prime powers: p(i+1)^j, i>=1, j>=1, read by antidiagonals.
|
|
7
|
|
|
|
1, 4, 2, 11, 10, 3, 26, 36, 18, 5, 61, 127, 78, 35, 6, 143, 471, 381, 234, 46, 7, 348, 1867, 1987, 1760, 349, 70, 8, 881, 7755, 11195, 14884, 3166, 686, 111, 9, 2279
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
Joint-rank arrays are defined in the first comment at A182801. A182870 is a permutation of the positive integers.
|
|
|
LINKS
|
Table of n, a(n) for n=1..37.
|
|
|
EXAMPLE
|
First, arrange the odd prime powers in rows:
3....9...27....81...
5...25..125...625...
7...49..343...2401...
Then replace each by its ranks when they are all jointly ranked:
1....4...11....26...
2...10...36...127...
3...18...78...381...
5...35..234..1760...
|
|
|
MATHEMATICA
|
T[i_, j_]:=Sum[Floor[j*Log[Prime[i+1]]/Log[Prime[h]]], {h, 2, PrimePi[Prime[i+1]^j]}]; TableForm[Table[T[i, j], {i, 1, 6}, {j, 1, 6}]]
|
|
|
CROSSREFS
|
A182801, A182869, A182871, A182872, A182942, A182943.
Sequence in context: A154699 A213568 A185878 * A094406 A142706 A361216
Adjacent sequences: A182867 A182868 A182869 * A182871 A182872 A182873
|
|
|
KEYWORD
|
nonn,tabl
|
|
|
AUTHOR
|
Clark Kimberling, Dec 09 2010
|
|
|
EXTENSIONS
|
Corrected and extended by Clark Kimberling, Dec 14 2010
|
|
|
STATUS
|
approved
|
| |
|
|
