[go: up one dir, main page]

login
A062697
Palindromes > 10 that are the sum of two distinct smaller palindromes.
0
11, 33, 44, 55, 66, 77, 88, 99, 101, 121, 202, 212, 222, 232, 242, 252, 262, 272, 282, 292, 303, 313, 323, 333, 343, 353, 363, 373, 383, 393, 404, 414, 424, 434, 444, 454, 464, 474, 484, 494, 505, 515, 525, 535, 545, 555, 565, 575, 585, 595, 606, 616, 626
OFFSET
1,1
COMMENTS
Includes every palindrome > 22 whose first digit is not 1. - Robert Israel, Mar 17 2015
EXAMPLE
202 = 191 + 11 and all are palindromes.
MATHEMATICA
With[{pals=Select[Range[1000], IntegerDigits[#]==Reverse[ IntegerDigits[ #]]&]}, Select[ Union[Select[Total/@Subsets[pals, {2}], IntegerDigits[#] == Reverse[IntegerDigits[#]]&]], #>9&]] (* Harvey P. Dale, Mar 16 2015 *)
CROSSREFS
Sequence in context: A018947 A038634 A373047 * A247110 A022671 A029516
KEYWORD
base,easy,nonn
AUTHOR
Erich Friedman, Jul 04 2001
EXTENSIONS
Corrected by Harvey P. Dale, Mar 16 2015
STATUS
approved