login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A068637 a(n) = Max(n, R(n)), where R(n) (A004086) = digit reversal of n. 4
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 21, 31, 41, 51, 61, 71, 81, 91, 20, 21, 22, 32, 42, 52, 62, 72, 82, 92, 30, 31, 32, 33, 43, 53, 63, 73, 83, 93, 40, 41, 42, 43, 44, 54, 64, 74, 84, 94, 50, 51, 52, 53, 54, 55, 65, 75, 85, 95, 60, 61, 62, 63, 64, 65, 66, 76, 86, 96, 70, 71 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

a(n) = A004186(n) for n <= 100. - Reinhard Zumkeller, Apr 03 2015

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

EXAMPLE

a(12) = max(12,21) = 21. a(34632) = max(34632,23643) = 34632.

MAPLE

a:= n-> max(n, (s-> parse(cat(seq(s[-i], i=1..length(s)))))(""||n)):

seq(a(n), n=1..100);  # Alois P. Heinz, Aug 22 2015

MATHEMATICA

Table[Max[n, IntegerReverse[n]], {n, 100}] (* The program uses the IntegerReverse function from Mathematica version 10 *) (* Harvey P. Dale, Jan 10 2016 *)

PROG

(Haskell)

a068637 n = max n $ a004086 n  -- Reinhard Zumkeller, Apr 03 2015

CROSSREFS

Cf. A068636.

Cf. A004086, A004186.

Sequence in context: A261294 A321474 A225805 * A004186 A034704 A276512

Adjacent sequences:  A068634 A068635 A068636 * A068638 A068639 A068640

KEYWORD

base,easy,nonn,hear,look

AUTHOR

Amarnath Murthy, Feb 27 2002

EXTENSIONS

Wrong a(13)=22 removed by Reinhard Zumkeller, Apr 03 2015

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 November 18 07:22 EST 2019. Contains 329252 sequences. (Running on oeis4.)