|
| |
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,3
|
|
|
COMMENTS
|
|
|
|
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
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn,tabf
|
|
|
AUTHOR
|
|
|
|
EXTENSIONS
|
|
|
|
STATUS
|
approved
|
| |
|
|
