

A016082


Add 4, then reverse the decimal digits.


5



10, 41, 54, 85, 98, 201, 502, 605, 906, 19, 32, 63, 76, 8, 21, 52, 65, 96, 1, 5, 9, 31, 53, 75, 97, 101, 501, 505, 905, 909, 319, 323, 723, 727, 137, 141, 541, 545, 945, 949, 359, 363, 763, 767, 177, 181, 581, 585, 985, 989, 399, 304, 803, 708, 217, 122, 621, 526
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Table of n, a(n) for n=1..58.


MATHEMATICA

Reversal = ToExpression @ StringReverse @ ToString[ # ] &; a[ 1 ]=10; a[ n_Integer ] := Reversal[ a[ n  1 ] + 4 ]; Table[ a[ n ], {n, 1, 80} ] (* Robert G. Wilson v *)
NestList[FromDigits[Reverse[IntegerDigits[# + 4]]] &, 10, 70] (* Harvey P. Dale, Jan 18 2011 *)


CROSSREFS

All of A003608, A016081, A016082 (and possibly others) eventually reach the trajectory of 1 shown in A119031. Cf. A055198.
Sequence in context: A000449 A027274 A253674 * A003355 A247201 A022278
Adjacent sequences: A016079 A016080 A016081 * A016083 A016084 A016085


KEYWORD

nonn,base


AUTHOR

Robert G. Wilson v


EXTENSIONS

Edited by Charles R Greathouse IV, Aug 04 2010


STATUS

approved



