A235043 Partial sums of the characteristic function of A091209.

0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 10

Offset: 0

Author

Antti Karttunen, Jan 02 2014

Keywords

• nonn

Comments

Note that this also works as an inverse function of A091209 in a sense that a(A091209(n)) = n for all n>=1.

Links

• Antti Karttunen, Table of n, a(n) for n = 0..10007

Crossrefs

Used to compute A235041. Cf. A010051, A091247, A235044.

Programs

Scheme

(define (A235043 n) (if (zero? n) n (+ (A235043 (- n 1)) (+ (* (A010051 n) (A091247 n))))))