This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A085935 #6 Jul 20 2020 10:43:06 %S A085935 1,2,3,4,101,202,303,404,454,505,545,606,616,636,676,707,808,818,909, %T A085935 1001,2002,3003,4004,5005,6006,7007,8008,9009,10001,10101,11011,20002, %U A085935 20202,22022,22622,30003,30303,33033,34243,40004,40404,43234,44044 %N A085935 Palindromes in A085934. %e A085935 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 A085935 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 A085935 Cf. A085932, A085933, A085934. %K A085935 base,easy,nonn %O A085935 1,2 %A A085935 _Jason Earls_ and _Amarnath Murthy_, Jul 14 2003