The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #6 Jul 20 2020 10:43:06
%S 1,2,3,4,101,202,303,404,454,505,545,606,616,636,676,707,808,818,909,
%T 1001,2002,3003,4004,5005,6006,7007,8008,9009,10001,10101,11011,20002,
%U 20202,22022,22622,30003,30303,33033,34243,40004,40404,43234,44044
%N Palindromes in A085934.
%e 616 is a member as the digits of 616 sorted in ascending order are 166 and the digital product of 166 is 36 and 166 + 36 = 202 is a palindrome.
%t pdsQ[n_]:=Module[{ds=Sort[IntegerDigits[n]]},AllTrue[{n,FromDigits[ds]+ Times@@ds},PalindromeQ]]; Select[Range[45000],pdsQ] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 20 2020 *)
%Y Cf. A085932, A085933, A085934.
%K base,easy,nonn
%O 1,2
%A _Jason Earls_ and _Amarnath Murthy_, Jul 14 2003