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 A158333 #10 Aug 18 2016 15:49:12
%S A158333 1,3,5,7,9,11,13,15,17,19,21,24,26,28,30,32,34,36,38,40,42,45,47,49,
%T A158333 51,53,55,57,59,61,63,65,68,70,72,74,76,78,80,82,84,86,89,91,93,95,97,
%U A158333 99,101,103,105,107,109,112,114,116,118,120,122,124,126,128,130,133,135
%N A158333 Position of number of digits increment in the sequence of powers of 3.
%F A158333 a(n)=1+Floor(n/Log_10(3)) = 1+A054965(n).
%e A158333 For n=1 a(1)=3 since the sequence of powers of 3 is 1, 3, 9, 27, 81, 243, 729 and numbers of digits increase at position 1,3,5,...
%p A158333 A158333 := proc(n)
%p A158333 1+floor(n/log10(3)) ;
%p A158333 end proc:
%p A158333 seq(A158333(n),n=0..20) ; # _R. J. Mathar_, Sep 01 2014
%t A158333 a[x_] := 1 + Floor[x/Log[10, 3]]; Table[a[i], {i, 0, 20}]
%Y A158333 A123384
%K A158333 nonn,base
%O A158333 0,2
%A A158333 _Julio Cesar de la Yncera_, Mar 16 2009
%E A158333 Indices in offset, example, and formula adjusted by _R. J. Mathar_, May 21 2009
%E A158333 More terms from _Robert G. Wilson v_, May 29 2009