OFFSET
1,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..750
EXAMPLE
9306 = 2 * 3 * 3 * 11 * 47 -> Sum of factors is palindrome 66 -> 9306 / 66 = 141 and quotient 141 is also palindromic.
MATHEMATICA
palQ[n_]:=Reverse[x=IntegerDigits[n]]==x; t={}; Do[If[!PrimeQ[n]&&IntegerQ[z=n/(y=Total[Times@@@FactorInteger[n]])]&&And@@palQ/@{y, z}, AppendTo[t, n]], {n, 4, 3*10^6}]; t (* Jayanta Basu, Jun 05 2013 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jun 15 1998
EXTENSIONS
Offset set to 1 and more terms added by Giovanni Resta, Nov 01 2019
STATUS
approved