OFFSET
1,1
COMMENTS
Complement of A115180.
LINKS
Eric Weisstein's World of Mathematics, Beatty Sequence
Eric Weisstein's World of Mathematics, Champernowne Constant
FORMULA
a(n) = floor(n * 5.26315808...).
MATHEMATICA
c = FromDigits[ Flatten[IntegerDigits /@ Range@100]]/10^191; Array[ Floor[ #*c/(c - 1)] &, 56] (* Robert G. Wilson v, Jan 18 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jan 15 2006
STATUS
approved