OFFSET
0,1
EXAMPLE
2484375 = 3 * 5 * 5 * 5 * 5 * 5 * 5 * 53 -> 355555553 is palindromic.
MATHEMATICA
For[n=2, n<1000000, n++, factors=FactorInteger[n]; If[Total[Transpose[factors][[2]]]!=8, Continue[]]; digits={}; For[i=1, i<=Length[factors], i++, digits=Join[digits, Flatten[Table[IntegerDigits[factors[[i, 1]]], {factors[[i, 2]]}]]]; ]; If[digits==Reverse[digits], Print[n]]; ]; - Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 17 2006
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jul 15 1998
EXTENSIONS
More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 17 2006
STATUS
approved