login
A261644
Distance of A260273(n) to next power of 2.
6
1, 1, 3, 8, 5, 1, 15, 12, 9, 5, 1, 31, 28, 25, 20, 13, 8, 3, 63, 60, 57, 52, 47, 44, 41, 37, 33, 29, 24, 17, 13, 8, 3, 127, 124, 121, 116, 111, 108, 105, 99, 91, 88, 85, 81, 77, 70, 66, 62, 57, 52, 47, 40, 33, 29, 24, 15, 10, 6, 2, 254, 251, 248, 245, 239
OFFSET
1,3
COMMENTS
This sequence, as well as A261712, is suggested by A261396 and A261416.
LINKS
FORMULA
a(n) = A062383(A260273(n)) - A260273(n).
EXAMPLE
. 1: 1
. 2: 1
. 3: 3
. 4: 8,5,1
. 5: 15,12,9,5,1
. 6: 31,28,25,20,13,8,3
. 7: 63,60,57,52,47,44,41,37,33,29,24,17,13,8,3
. 8: 127,124,121,116,111,108,105,99,91,88,85,81,77,70,... (27 terms)
. 9: 254,251,248,245,239,236,233,227,218,213,207,202,195,,... (49 terms)
PROG
(Haskell)
a261644 n = a261644_list !! (n-1)
a261644_list = zipWith (-)
(map a062383 a260273_list) $ map fromIntegral a260273_list
a261644_tabf = [1] : f (tail $ zip a261645_list a261644_list) where
f dxs = (map snd (dxs'' ++ [dx])) : f dxs' where
(dxs'', dx:dxs') = span ((<= 0) . fst) dxs
a261644_row n = a261644_tabf !! (n-1)
CROSSREFS
Cf. A260273, A062383, A261645 (first differences), A261712 (reversed), A261646 (row lengths).
Sequence in context: A221315 A131653 A011239 * A345449 A348026 A200699
KEYWORD
nonn,tabf
AUTHOR
Reinhard Zumkeller, Aug 30 2015
STATUS
approved