login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A001127 Trajectory of 1 under map x->x + (x-with-digits-reversed). 15
1, 2, 4, 8, 16, 77, 154, 605, 1111, 2222, 4444, 8888, 17776, 85547, 160105, 661166, 1322332, 3654563, 7309126, 13528163, 49710694, 99312488, 187733887, 976071668, 1842242347, 9274664828, 17559329557, 93151725128, 175304440267, 937348843838, 1775697687577 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

Normally one stops as soon as a palindrome is reached.

A Reverse and Add! sequence.

Trajectories of 25, 34, 43, 52, 59, 61, 68, 70, 86, 95, ..., merge into this sequence. - Robert G. Wilson v, Dec 16 2005.

LINKS

Reinhard Zumkeller and Alois P. Heinz, Table of n, a(n) for n = 0..1000 (first 251 terms from Reinhard Zumkeller)

Index entries for sequences related to Reverse and Add!

MAPLE

a:= proc(n) option remember; `if`(n=0, 1, (h-> h+ (s->

      parse(cat(s[-i]$i=1..length(s))))(""||h))(a(n-1)))

    end:

seq(a(n), n=0..40);  # Alois P. Heinz, Jun 18 2014

MATHEMATICA

NestList[ # + FromDigits@Reverse@IntegerDigits@# &, 1, 30] (* Robert G. Wilson v, Dec 16 2005 *)

NestList[#+IntegerReverse[#]&, 1, 30] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 19 2019 *)

PROG

(Haskell)

a001127 n = a001127_list !! n

a001127_list = iterate a056964 1 -- Reinhard Zumkeller, Sep 22 2011

CROSSREFS

Cf. A006960, A023108, A033648, A033649, A033650, A033651.

Cf. A056964, A004086.

Row n=1 of A243238.

Sequence in context: A066713 A004000 A051300 * A051299 A097049 A119490

Adjacent sequences:  A001124 A001125 A001126 * A001128 A001129 A001130

KEYWORD

nonn,base,easy,nice

AUTHOR

N. J. A. Sloane, Jun 05 2002

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 12 10:54 EDT 2021. Contains 343821 sequences. (Running on oeis4.)