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 A253894 #8 Jan 25 2015 23:22:41 %S A253894 1,2,2,3,3,3,4,3,4,5,4,5,4,4,5,5,4,4,5,5,6,6,4,6,5,5,6,5,6,6,6,5,6,6, %T A253894 6,7,7,5,6,7,5,7,6,6,7,6,6,6,7,5,7,7,5,7,7,6,7,6,6,7,6,7,5,7,7,7,7,5, %U A253894 8,8,7,7,7,6,8,8,6,7,8,7,7,8,6,8,7,7,8,6,7,8,8,7,7,7,6,8,8,7,8,8,7,7,7,7,7,8,8,7,8,8,8,8,6,8,8,7,8,8,8,8 %N A253894 a(1) = 1, for n > 1, a(n) = 1 + a(A253889(n)). %H A253894 Antti Karttunen, <a href="/A253894/b253894.txt">Table of n, a(n) for n = 1..8192</a> %F A253894 a(1) = 1, for n > 1, a(n) = 1 + a(A253889(n)). %F A253894 a(n) = A070939(A064216(n)). [Binary width of terms of A064216.] %F A253894 a(n) = A253893(n) + 1. %F A253894 a(n) = A254044(n) + A254045(n). %o A253894 (Scheme, with memoization-macro definec) %o A253894 (definec (A253894 n) (if (= 1 n) 1 (+ 1 (A253894 (A253889 n))))) %o A253894 (define (A253894 n) (A070939 (A064216 n))) ;; Alternatively. %Y A253894 One more than A253893. %Y A253894 Sum of A254044 and A254045. %Y A253894 Cf. A064216, A070939, A253889. %K A253894 nonn %O A253894 1,2 %A A253894 _Antti Karttunen_, Jan 22 2015