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 A285728 #5 Apr 25 2017 11:48:02 %S A285728 0,1,1,1,1,2,1,1,1,3,1,2,1,5,2,1,1,4,1,3,3,7,1,2,1,11,1,5,1,6,1,1,5, %T A285728 13,2,4,1,17,7,3,1,10,1,7,2,19,1,2,1,9,11,11,1,8,3,5,13,23,1,6,1,29,3, %U A285728 1,5,14,1,13,17,15,1,4,1,31,4,17,2,22,1,3,1,37,1,10,7,41,19,7,1,12,3,19,23,43,11,2,1,25,5,9,1,26,1,11,6,47,1,8,1,21,29 %N A285728 a(1) = 0; for n > 1, if n is even, then a(n) = A252463(A000265(n)), otherwise a(n) = a(A064989(n)). %H A285728 Antti Karttunen, <a href="/A285728/b285728.txt">Table of n, a(n) for n = 1..8192</a> %F A285728 a(1) = 0; for n > 1, if n is even, then a(n) = A252463(A000265(n)), otherwise a(n) = a(A064989(n)). %o A285728 (Scheme) (define (A285728 n) (cond ((<= n 1) 0) ((even? n) (A252463 (A000265 n))) (else (A285728 (A064989 n))))) %Y A285728 Cf. A000265, A064989, A252463, A285727. %K A285728 nonn %O A285728 1,6 %A A285728 _Antti Karttunen_, Apr 25 2017