A078337 Palindromes which are a nontrivial product of 2 palindromes (which need not be distinct).

4, 6, 8, 9, 22, 33, 44, 55, 66, 77, 88, 99, 121, 202, 222, 242, 262, 282, 303, 333, 363, 393, 404, 424, 444, 464, 484, 505, 555, 606, 616, 626, 636, 646, 666, 686, 696, 707, 777, 808, 828, 848, 868, 888, 909, 939, 969, 999, 1111, 1221, 1331, 1441, 1551, 1661

Offset: 1

Author

Amarnath Murthy, Jun 07 2002

Keywords

• base
• nonn
• easy

Links

• Giovanni Resta, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A002113, A078895.

Programs

Mathematica

palQ[n_] := Reverse[x = IntegerDigits[n]] == x; t1 = Rest[Select[Range[1670], palQ[#] &]]; Intersection[t1, Union[Flatten[Table[i*j, {i, t1}, {j, t1}]]]] (* Jayanta Basu, Jun 15 2013 *)

Extensions

Corrected and extended by Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 19 2003