login
Palindromes n such that n+(product of digits of n) gives a larger palindrome.
2

%I #10 Sep 19 2024 12:06:42

%S 1,2,3,4,252,393,525,15451,25152,25252,25352,25452,36563,45154,51415,

%T 52125,52225,52325,52425,54145,63536,92529,1455541,1545451,1569651,

%U 1659561,1954591,1958591,2255522,2359532,2525252,2539352,2552552

%N Palindromes n such that n+(product of digits of n) gives a larger palindrome.

%C Each of the terms must contain no zeros. - _Harvey P. Dale_, Sep 18 2024

%H Chai Wah Wu, <a href="/A114341/b114341.txt">Table of n, a(n) for n = 1..10000</a>

%e 393 + 3*9*3 = 474.

%t Select[Range[256*10^4],FreeQ[IntegerDigits[#],0]&&AllTrue[#+{0,Times@@IntegerDigits[#]},PalindromeQ]&] (* _Harvey P. Dale_, Sep 18 2024 *)

%K base,nonn

%O 1,2

%A _Giovanni Resta_, Feb 08 2006