This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A253783 #5 Jan 16 2015 10:19:20 %S A253783 0,2,3,3,4,4,5,3,4,5,6,5,7,6,5,4,8,5,9,6,6,7,10,5,5,8,4,7,11,6,12,4,7, %T A253783 9,6,6,13,10,8,6,14,7,15,8,6,11,16,6,6,6,9,9,17,5,7,7,10,12,18,7,19, %U A253783 13,7,5,8,8,20,10,11,7,21,6,22,14,6,11,7,9,23,7,5,15,24,8,9,16,12,8,25,7,8,12,13,17,10,6,26,7,8,7,27,10,28 %N A253783 a(1) = 0; for n>1: a(n) = A075167(1+A071178(n)) + (A061395(n) - A061395(A051119(n))) + a(A051119(n)). %C A253783 An auxiliary recurrence for computing A075167. %H A253783 Antti Karttunen, <a href="/A253783/b253783.txt">Table of n, a(n) for n = 1..10000</a> %F A253783 a(1) = 0; for n>1: a(n) = A075167(1+A071178(n)) + (A061395(n) - A061395(A051119(n))) + a(A051119(n)). %o A253783 (Scheme, with memoization-macro definec) %o A253783 (definec (A253783 n) (if (= 1 n) 0 (+ (A075167 (+ 1 (A071178 n))) (- (A061395 n) (A061395 (A051119 n))) (A253783 (A051119 n))))) %Y A253783 Cf. A051119, A061395, A075167, A071178. %Y A253783 Cf. also A106490. %K A253783 nonn %O A253783 1,2 %A A253783 _Antti Karttunen_, Jan 16 2015