A342942 Numbers whose palindromization is a perfect power.
12, 13, 34, 48, 67, 102, 123, 146, 408, 449, 696, 698, 942, 1002, 1030, 1234, 1367, 4008, 5221, 6948, 10002, 10030, 10203, 10406, 12124, 12345, 12568, 40008, 40409, 52280, 61732, 94206, 100002, 102214, 106625, 121024, 123456, 400008, 637832, 1000002, 1000300, 1002003
Offset: 1
Examples
12 is a term because 121 is a square. 13 is a term because 1331 is a cube.
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..1997 (terms 1..100 from Michel Marcus)
Programs
-
Mathematica
Select[Range[10,50000],Or@@(GCD@@Last/@FactorInteger@#>1&/@FromDigits/@(Join[a,Reverse@#]&/@{a=IntegerDigits@#,Most@a}))&] (* Giorgos Kalogeropoulos, Mar 30 2021 *)
-
PARI
rev(x) = strjoin(Vecrev(Str(x))); isok(m) = ispower(eval(Str(m, rev(m)))) || ispower(eval(Str(m, rev(m\10))));
Comments