OFFSET
1,2
FORMULA
a(n)=round[log_10{9*(10^(n*(10^n - 1)/9) - 1)/(10^n - 1)^2}]
MATHEMATICA
f[n_] := Floor[n(10^n - 1)/9 - 2n + Log[10, 9] + If[n == 1, 2, 1]]; Array[f, 18] (* Robert G. Wilson v, Aug 27 2006 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Lekraj Beedassy, Aug 26 2006
EXTENSIONS
More terms from Robert G. Wilson v, Aug 27 2006
STATUS
approved