A016081 Add 4, then reverse digits; start with 3.

3, 7, 11, 51, 55, 95, 99, 301, 503, 705, 907, 119, 321, 523, 725, 927, 139, 341, 543, 745, 947, 159, 361, 563, 765, 967, 179, 381, 583, 785, 987, 199, 302, 603, 706, 17, 12, 61, 56, 6, 1, 5, 9, 31, 53, 75, 97, 101, 501, 505, 905, 909, 319, 323, 723, 727, 137, 141, 541

Offset

1,1

Comments

At 41st term, 1, the sequence joins the trajectory for a(1)=1, A119031. Cycle of length 54. - Zak Seidov, May 09 2006. (Corrected by N. J. A. Sloane, Aug 02 2009.)

Links

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

Maple

rev:=proc(n) local nn: nn:=convert(n, base, 10): add(nn[j]*10^(nops(nn)-j), j= 1..nops(nn)) end proc: a[1]:=3: for n from 2 to 60 do a[n]:=rev(4+a[n-1]) end do: seq(a[n], n=1..60); # Emeric Deutsch, Aug 26 2007

Mathematica

NestList[FromDigits[Reverse[IntegerDigits[#+4]]]&, 3, 60] (* Harvey P. Dale, Oct 01 2015 *)

Prog

(PARI) a=26; A016081=vector(99, i, a=fromdigits(Vecrev(digits(a+4)))) \\ M. F. Hasler, Mar 15 2022
(Python)
def A016081(N=99, a=3, d=4): # optional args: # terms, initial value, increment
   for _ in range(N): yield a; a=int(str(a+d)[::-1])
list(A016081()) # M. F. Hasler, Mar 15 2022

Crossrefs

All of A003608, A016081, A016082 (and possibly others) eventually reach the trajectory of 1 shown in A119031. Cf. A055198.

Sequence in context: A217383 A005372 A125220 * A287301 A105762 A057469

Adjacent sequences: A016078 A016079 A016080 * A016082 A016083 A016084

Keyword

nonn,base

Author

Robert G. Wilson v

Extensions

Corrected and extended by Franklin T. Adams-Watters, Mar 30 2006

Edited by N. J. A. Sloane at the suggestion of Andrew S. Plewe, Aug 23 2007

Name edited by M. F. Hasler, Mar 15 2022

Status

approved