login
Palindromes k such that k + 11 is also a palindrome.
1

%I #9 Jan 29 2023 12:59:32

%S 11,22,33,44,55,66,77,88,191,292,393,494,595,696,797,898,1991,2992,

%T 3993,4994,5995,6996,7997,8998,19991,29992,39993,49994,59995,69996,

%U 79997,89998

%N Palindromes k such that k + 11 is also a palindrome.

%C A pattern is visible.

%C This conjectured Mathematica program builds on the perceived pattern:

%C Flatten[Table[FromDigits[Join[{n},PadRight[{},k,9],{n}]],{n,8},{k,0,4}]]//Sort

%C It will generate an additional 8 terms for each increase in the number of digits of added terms.(* _Harvey P. Dale_, Jan 29 2023 *)

%e 595 + 11= 606 is also a palindrome.

%t Select[Range[100000],AllTrue[#+{0,11},PalindromeQ]&] (* _Harvey P. Dale_, Jan 29 2023 *)

%K base,easy,nonn

%O 1,1

%A _Amarnath Murthy_, Apr 13 2003