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 A226732 #12 Feb 21 2020 09:59:17 %S A226732 1,2,3,5,7,11,101,111,131,141,151,161,171,181,191,212,232,252,272,292, %T A226732 313,323,343,353,373,383,414,434,454,474,494,515,525,535,545,565,575, %U A226732 585,595,656,676,717,727,737,747,757,767,787,797,818,838,858,878,898 %N A226732 Palindromes that cannot be expressed as a nontrivial product of two palindromes. %C A226732 Complement of A078337. %H A226732 Giovanni Resta, <a href="/A226732/b226732.txt">Table of n, a(n) for n = 1..10000</a> %t A226732 palQ[n_] := Reverse[x = IntegerDigits[n]] == x; t1 = Rest[Select[Range[900], palQ[#] &]]; Join[{1}, Complement[t1, Union[Flatten[Table[i*j, {i, t1}, {j, t1}]]]]] %Y A226732 Cf. A078337. %K A226732 nonn,base %O A226732 1,2 %A A226732 _Jayanta Basu_, Jun 16 2013