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 A119477 #11 Nov 05 2023 09:02:08 %S A119477 1,2,4,3,6,5,5,4,8,7,7,6,7,6,6,5,10,9,9,8,9,8,8,7,9,8,8,7,8,7,7,6,12, %T A119477 11,11,10,11,10,10,9,11,10,10,9,10,9,9,8,11,10,10,9,10,9,9,8,10,9,9,8, %U A119477 9,8,8,7,14,13,13,12,13,12,12,11,13,12,12,11,12,11,11,10,13,12,12,11,12,11 %N A119477 a(1)=1, a(n) = a((n+1)/2) + 2 if n is odd, a(n) = a(n/2) + 1 if n is even. %F A119477 a(n) = A061313(n) + 1. - _Philippe Deléham_, Nov 03 2008 %t A119477 a[1]=1;a[n_]:=a[n]=If[OddQ[n],a[(n+1)/2]+2,a[n/2]+1]; Table[a[n],{n,300}] %Y A119477 Cf. A061313, A119476. %K A119477 nonn %O A119477 1,2 %A A119477 _Zak Seidov_, May 22 2006