OFFSET
1,1
COMMENTS
Many terms of A327325 are palindromes, hence this sequence.
a(16) > 3.5*10^11. - Giovanni Resta, Sep 04 2019
EXAMPLE
Divisors of 26 are : 1,2,13,26 and 1*2*13*26=676.
MATHEMATICA
Select[Range[3200000], !PalindromeQ[#] && PalindromeQ[#^(DivisorSigma[0, #]/2)] &] (* Amiram Eldar, Sep 02 2019 *)
PROG
(PARI) ispal(n) = my(d=digits(n)); d == Vecrev(d);
isok(n) = !ispal(n) && ispal(vecprod(divisors(n)));
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Michel Marcus, Sep 02 2019
EXTENSIONS
a(8)-a(15) from Giovanni Resta, Sep 04 2019
STATUS
approved