A182870 Joint-rank array of odd prime powers: p(i+1)^j, i>=1, j>=1, read by antidiagonals.

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

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