[go: up one dir, main page]

login
A235044
Partial sums of the characteristic function of A091214.
6
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 4
OFFSET
0,56
COMMENTS
Note that this also works as an inverse function of A091214 in a sense that a(A091214(n)) = n for all n>=1.
LINKS
PROG
(Scheme) (definec (A235044 n) (if (zero? n) n (+ (A235044 (- n 1)) (+ (* (A066247 n) (A091225 n))))))
CROSSREFS
Used to compute A235042. Cf. A066247, A091225, A235043.
Sequence in context: A343356 A242253 A071839 * A163857 A185715 A111893
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jan 02 2014
STATUS
approved