|
|
A182950
|
|
Joint-rank array of the numbers (3*i+2)*3^j, where i>=0, j>=0, by antidiagonals.
|
|
2
|
|
|
1, 3, 2, 9, 7, 4, 27, 22, 12, 5, 81, 67, 36, 16, 6, 243, 202, 108, 49, 20, 8, 729, 607, 324, 148, 62, 25, 10, 2187, 1822, 972, 445, 188, 76, 30, 11, 6561, 5467, 2916, 1336, 566, 229, 90, 34, 13, 19683, 16402, 8748, 4009, 1700, 688, 270, 103, 39, 14
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Joint-rank arrays are defined in the first comment at A182801. As for any joint-rank array, A182950 is a permutation of the positive integers, but, a fortiori, A182950 is an interspersion: after initial terms every row is interspersed with all other rows. The numbers (3*i+2)*3^j as an array comprise A182830; and sorted, possibly A026179.
|
|
LINKS
|
|
|
EXAMPLE
|
Northwest corner:
1....3....9....27...
2....7...22....67...
4...12...36...108...
5...16...49...148...
|
|
MATHEMATICA
|
M[i_, j_]:=j+Floor[Log[3*i/2+1]/Log[3]];
T[i_, j_]:=Sum[Floor[1/3+(3*i+2)*3^(j-k-1)], {k, 0, M[i, j]}];
TableForm[Table[T[i, j], {i, 0, 9}, {j, 0, 9}]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|