|
|
A078337
|
|
Palindromes which are a nontrivial product of 2 palindromes (which need not be distinct).
|
|
4
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected and extended by Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 19 2003
|
|
STATUS
|
approved
|
|
|
|