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 A046356 #11 Oct 10 2019 22:52:52 %S A046356 9,15,27,45,121,495,735,875,1331,1701,2025,2101,2121,2525,2751,3171, %T A046356 3275,3775,3801,4525,5445,6573,7413,7825,7833,8043,8085,8595,8767, %U A046356 8825,9325,9575,9625,10201,12005,13231,14641,15251,15267,15897,16527,17161 %N A046356 Odd numbers with only palindromic prime factors whose sum is palindromic (counted with multiplicity). %e A046356 8767 = 11 * 797 -> 11 + 797 = 808 and 808 is a palindrome. %t A046356 palQ[n_] := Reverse[x=IntegerDigits[n]] == x; Select[Range[9,17170,2], !PrimeQ[#] && And@@palQ/@Join[{Total[Times@@@(x=FactorInteger[#])]}, First/@x]&] (* _Jayanta Basu_, Jun 05 2013 *) %Y A046356 Cf. A046355, A046357. %K A046356 nonn,base %O A046356 0,1 %A A046356 _Patrick De Geest_, Jun 15 1998