OFFSET
0,2
EXAMPLE
Add 7 to the first "7" gives 14
Add 7 to the "1" of this 14 gives 8; and adding 7 to the "4" of this 14 gives 11.
MATHEMATICA
Flatten[ NestList[ Function[x, Flatten[ IntegerDigits[x] + 7]], {0}, 10]] (* Robert G. Wilson v, Feb 04 2005 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Alexandre Wajnberg, Feb 02 2005
EXTENSIONS
More terms from Robert G. Wilson v, Feb 04 2005
STATUS
approved