login
A227048
Irregular triangle read by rows: row n, for n >= 0, lists the nonnegative differences 3^n - 2^m, m >= 0, in increasing order.
9
0, 1, 2, 1, 5, 7, 8, 11, 19, 23, 25, 26, 17, 49, 65, 73, 77, 79, 80, 115, 179, 211, 227, 235, 239, 241, 242, 217, 473, 601, 665, 697, 713, 721, 725, 727, 728, 139, 1163, 1675, 1931, 2059, 2123, 2155, 2171, 2179, 2183, 2185, 2186, 2465, 4513, 5537, 6049, 6305
OFFSET
0,3
COMMENTS
A020914(n) = length of n-th row;
T(n,1) = A056577(n);
T(n,A098294(n)) = A001047(n);
T(n,A020914(n)) = A024023(n);
T(n,k) = A196486(n,A020914(n)-k) for n > 0, k = 1..A056576(n).
LINKS
EXAMPLE
Initial rows:
0: 0
1: 1,2
2: 1,5,7,8
3: 11,19,23,25,26 (= 27-16, 27-8, 27-4, 27-2, 27-1)
4: 17,49,65,73,77,79,80
5: 115,179,211,227,235,239,241,242
6: 217,473,601,665,697,713,721,725,727,728
7: 139,1163,1675,1931,2059,2123,2155,2171,2179,2183,2185,2186
8: 2465,4513,5537,6049,6305,6433,6497,6529,6545,6553,6557,6559,6560
...
PROG
(Haskell)
a227048 n k = a227048_tabf !! n !! (k-1)
a227048_row n = a227048_tabf !! n
a227048_tabf = map f a000244_list where
f x = reverse $ map (x -) $ takeWhile (<= x) a000079_list
KEYWORD
nonn,tabf
AUTHOR
Reinhard Zumkeller, Jun 29 2013
EXTENSIONS
Definition revised by N. J. A. Sloane, Oct 11 2019
STATUS
approved