|
%I #5 Sep 04 2016 17:20:56
%S 0,1,2,3,2,3,4,5,4,5,4,5,4,5,4,5,4,5,6,7,6,7,6,5,7,8,7,6,8,9,8,9,8,7,
%T 9,10,9,8,7,8,7,9,10,9,8,10,11,10,9,8,7,8,7,8,7,8,7,8,9,10,9,10,9,8,
%U 10,11,10,9,8,9,8,9,10,11,10,9,8,9,8,10,11,10,11,10,9,8,9,10,11,10,11,12,13,12,11,10,9,8,9,10
%N Partial sums of A276438.
%H Antti Karttunen, <a href="/A276439/b276439.txt">Table of n, a(n) for n = 0..10000</a>
%F a(0) = 0; for n >= 1, a(n) = A276438(n) + a(n-1).
%o (Scheme, with memoization-macro definec)
%o (definec (A276439 n) (if (zero? n) n (+ (A276438 n) (A276439 (- n 1)))))
%Y Cf. A274647, A276438
%Y Cf. also A064289, A078759.
%Y Differs from A078759 for the first time at n=24, where a(24)=7 while A078759(24)=6.
%K nonn
%O 0,3
%A _Antti Karttunen_, Sep 04 2016
|
