%I #28 Dec 12 2020 04:55:10
%S 1,3,5,7,9,121,222,323,424,525,626,727,828,929,1111,2112,3113,4114,
%T 5115,6116,7117,8118,9119,10401,11211,12921,13731,14541,15351,16161,
%U 18881,19691,20402,21212,22922,23732,24542,25352,26162,28882,29692,30403,31213,32923
%N Colombian palindromes.
%C Palindromes that are not the sum of an integer and of the individual digits of this integer (see Wikipedia link).
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Self_number">Self number or Colombian number</a>
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Palindromic_number">Palindromic number</a>
%H <a href="/index/Coi#Colombian">Index to sequences related to Colombian numbers</a>
%H <a href="/index/Pac#palindromes">Index to sequences related to palindromes</a>
%e 323 is a palindrome that cannot be written as the sum of any other natural number k and the digits of k, hence 323 that is Colombian number in base 10 is a term.
%e 333 is a palindrome but 333 = 324 + 3 + 2 + 4, hence 333 that is not a self number in base 10 is not a term.
%t n = 33000; Select[Complement[Range[n], Union @ Table[Plus @@ IntegerDigits[k] + k, {k, 1, n}]], PalindromeQ] (* _Amiram Eldar_, Mar 04 2020 *)
%Y Intersection of A002113 (palindromes) and A003052 (Colombians).
%Y Complement of A332240 relative to A002113.
%K nonn,base
%O 1,2
%A _Bernard Schott_, Mar 04 2020
%E More terms from _Amiram Eldar_, Mar 04 2020