OFFSET
1,1
COMMENTS
Palindromization is the function that extends the string representation of a number into a palindrome.
Even palindromization is the concatenation of a number and its reversal. Odd palindromization excludes the first digit of the reversal.
LINKS
Michel Marcus, Table of n, a(n) for n = 1..100
EXAMPLE
12 is a term because 121 is a square.
13 is a term because 1331 is a cube.
MATHEMATICA
Select[Range[10, 50000], Or@@(GCD@@Last/@FactorInteger@#>1&/@FromDigits/@(Join[a, Reverse@#]&/@{a=IntegerDigits@#, Most@a}))&] (* Giorgos Kalogeropoulos, Mar 30 2021 *)
PROG
(PARI) rev(x) = strjoin(Vecrev(Str(x)));
isok(m) = ispower(eval(Str(m, rev(m)))) || ispower(eval(Str(m, rev(m\10))));
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Marcus, Mar 30 2021
STATUS
approved