[go: up one dir, main page]

login
A099849
Partial sums of A008480.
3
1, 2, 3, 4, 5, 7, 8, 9, 10, 12, 13, 16, 17, 19, 21, 22, 23, 26, 27, 30, 32, 34, 35, 39, 40, 42, 43, 46, 47, 53, 54, 55, 57, 59, 61, 67, 68, 70, 72, 76, 77, 83, 84, 87, 90, 92, 93, 98, 99, 102, 104, 107, 108, 112, 114, 118, 120, 122, 123, 135, 136, 138, 141, 142, 144, 150
OFFSET
1,2
COMMENTS
A099848(a(n) - k) = n for 0 <= k < A008480(n).
LINKS
FORMULA
a(1) = A008480(1) and for n>1: a(n) = a(n-1) + A008480(n);
PROG
(Haskell)
a099849 n = a099849_list !! (n-1)
a099849_list = scanl1 (+) a008480_list -- Reinhard Zumkeller, Nov 19 2015
CROSSREFS
Cf. A008480.
Sequence in context: A032974 A127565 A082186 * A071163 A006644 A024898
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Oct 27 2004
STATUS
approved