A235044 - OEIS

%I #6 Jan 16 2014 15:04:40

%S 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,

%T 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,

%U 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,4

%N Partial sums of the characteristic function of A091214.

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

%H Antti Karttunen, <a href="/A235044/b235044.txt">Table of n, a(n) for n = 0..4119</a>

%o (Scheme) (definec (A235044 n) (if (zero? n) n (+ (A235044 (- n 1)) (+ (* (A066247 n) (A091225 n))))))

%Y Used to compute A235042. Cf. A066247, A091225, A235043.

%K nonn

%O 0,56

%A _Antti Karttunen_, Jan 02 2014