OFFSET
0,2
FORMULA
a(n)=1+Floor(n/Log_10(3)) = 1+A054965(n).
EXAMPLE
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,...
MAPLE
A158333 := proc(n)
1+floor(n/log10(3)) ;
end proc:
seq(A158333(n), n=0..20) ; # R. J. Mathar, Sep 01 2014
MATHEMATICA
a[x_] := 1 + Floor[x/Log[10, 3]]; Table[a[i], {i, 0, 20}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Julio Cesar de la Yncera, Mar 16 2009
EXTENSIONS
Indices in offset, example, and formula adjusted by R. J. Mathar, May 21 2009
More terms from Robert G. Wilson v, May 29 2009
STATUS
approved