OFFSET
1,2
COMMENTS
Add its rank to each digit of the counting numbers (beginning with 0).
EXAMPLE
The sequence of digits of the integers is
0 1 2 3 4 5 6 7 8 9 1 0 1 1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 9 2 0...
The 15th term, for instance, is a 1. Thus 1+15=16 is the 15th term of this sequence.
Next one is 2 (the digit) + 16 (the rank) = 18
MATHEMATICA
dgs = Flatten[IntegerDigits/@Range[0, 50]]; Plus@@@Partition[Riffle[dgs, Range[Length[dgs]]], 2] (* Harvey P. Dale, Jan 15 2011 *)
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Alexandre Wajnberg, Sep 30 2004
EXTENSIONS
More terms from Joshua Zucker, May 18 2006
STATUS
approved