The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A062936 Numbers n such that n*R(n) is a palindrome, where R(n) (A004086) = digit reversal. 2
 1, 2, 3, 11, 12, 21, 22, 101, 102, 111, 112, 121, 122, 201, 202, 211, 212, 221, 1001, 1002, 1011, 1012, 1021, 1022, 1101, 1102, 1111, 1112, 1121, 1201, 1202, 1211, 2001, 2002, 2011, 2012, 2021, 2101, 2102, 2111, 2201, 10001, 10002, 10011, 10012 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Harry J. Smith and Indranil Ghosh, Table of n, a(n) for n = 1..4357 (first 500 terms from Harry J. Smith) Martianus Frederic Ezerman, Bertrand Meyer and Patrick Solé, On Polynomial Pairs of Integers, arXiv:1210.7593 [math.NT], 2012. - From N. J. A. Sloane, Nov 08 2012 Martianus Frederic Ezerman, Bertrand Meyer and Patrick Solé, On Polynomial Pairs of Integers, Journal of Integer Sequences, Vol. 18 (2015), Article 15.3.5. FORMULA Includes integers not ending in 0 with sum of squares of digits < 10. - David W. Wilson, Jul 06 2001 EXAMPLE 122*221 = 26962 hence 122 belongs to the sequence. MAPLE R:=proc(w) local a, k, x; x:=0; a:=convert(w, base, 10); for k from 1 to nops(a) do x:=10*x+a[k]; od; x; end: P:=proc(n) if n*R(n)=R(n*R(n)) then n; fi; end: seq(P(i), i=1..10012); # Paolo P. Lava, Jul 10 2018 MATHEMATICA Select[Range[100000], Reverse[IntegerDigits[ #*FromDigits[Reverse[IntegerDigits[ # ]]]]] == IntegerDigits[ #*FromDigits[Reverse[IntegerDigits[ # ]]]] &] (* Tanya Khovanova, Jun 17 2009 *) Select[Range[11000], PalindromeQ[# IntegerReverse[#]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 21 2020 *) PROG (PARI) lista(nn) = for(n=1, nn, my(d=digits(n*eval(concat(Vecrev(Str(n)))), 10)); if(d == Vecrev(d), print1(n, ", "))); \\ Altug Alkan, Mar 26 2016 (Python) A062936_list = [] for n in range(1, 10**5): ....s = str(n*int(str(n)[::-1])) ....if s == s[::-1]: ........A062936_list.append(n) # Chai Wah Wu, Sep 08 2014 CROSSREFS Cf. A048343, A048344. Sequence in context: A060812 A212129 A172409 * A136972 A227764 A135115 Adjacent sequences: A062933 A062934 A062935 * A062937 A062938 A062939 KEYWORD nonn,base,easy AUTHOR Amarnath Murthy, Jul 05 2001 EXTENSIONS Corrected and extended by Dean Hickerson and Patrick De Geest, Jul 06 2001 STATUS approved

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

Last modified February 5 18:26 EST 2023. Contains 360087 sequences. (Running on oeis4.)