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 A284007 #7 Mar 23 2017 20:32:34 %S A284007 1,1,2,2,3,3,4,4,5,5,6,7,7,7,8,8,9,10,11,11,11,12,12,14,13,14,14,15, %T A284007 16,15,16,16,18,18,18,19,19,20,20,22,22,24,23,25,24,25,25,25,26,26,27, %U A284007 27,28,29,28,30,29,30,31,30,32,34,34,33,33,34,34,36,37,36,37,38,38,40,41,39,40,43,42,44,43,43,44,44,45,45,45,50 %N A284007 a(n) = a(a(n-A002487(n))) + a(n-a(n-A002487(n))) with a(1) = a(2) = 1, where A002487 = Stern-Brocot sequence. %H A284007 Antti Karttunen, <a href="/A284007/b284007.txt">Table of n, a(n) for n = 1..16384</a> %F A284007 a(1) = a(2) = 1, for n > 2, a(n) = a(a(A284013(n))) + a(n-a(A284013(n))). %o A284007 (Scheme, with memoization-macro definec) %o A284007 (definec (A284007 n) (if (<= n 2) 1 (+ (A284007 (A284007 (- n (A002487 n)))) (A284007 (- n (A284007 (- n (A002487 n)))))))) ;; Code for A002487 given under that entry. %Y A284007 Cf. A002487, A004001, A283474, A284000, A284007, A284013. %K A284007 nonn %O A284007 1,3 %A A284007 _Antti Karttunen_, Mar 23 2017