login
A084998
Palindromes formed from the concatenation of n, sum of n and R(n), and R(n) with its leading zeros; or 0 if no such palindrome exists. R(k) is the digit reversal of k.
2
121, 242, 363, 484, 0, 0, 0, 0, 0, 101101, 112211, 123321, 134431, 145541, 156651, 167761, 178871, 189981, 0, 202202, 213312, 224422, 235532, 246642, 257752, 268862, 279972, 0, 2912192, 303303, 314413, 325523, 336633, 347743, 358853, 369963, 0, 3812183, 0
OFFSET
1,1
LINKS
EXAMPLE
E.g. a(38)=3812183: 83+38=121 and 38_121_83 is a palindrome.
MATHEMATICA
f[n_]:=FromDigits[Join[IntegerDigits[n], IntegerDigits[n+ IntegerReverse[ n]], Reverse[ IntegerDigits[n]]]]; Table[If[PalindromeQ[f[n]], f[n], 0], {n, 50}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 13 2018 *)
CROSSREFS
Sequence in context: A346507 A119378 A261618 * A082944 A131973 A045571
KEYWORD
nonn,base
AUTHOR
Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jul 01 2003
EXTENSIONS
New description from Charles R Greathouse IV, Aug 02 2010
Corrected and extended by Harvey P. Dale, Aug 13 2018
STATUS
approved