A366080 Numbers that give a perfect power when added to their reverse.
2, 4, 8, 29, 38, 47, 56, 65, 74, 83, 92, 110, 122, 143, 164, 198, 221, 242, 263, 297, 320, 341, 362, 396, 440, 461, 495, 560, 594, 693, 792, 891, 990, 1030, 1120, 1210, 1300, 10100, 10148, 10340, 10395, 10403, 10683, 10908, 10980, 11138, 11330, 11385, 11673
Offset: 1
Examples
8 is a term because 8 + 8 = 16 = 2^4 or 4^2. 10340 is a term because 10340 + 04301 = 14641 is a perfect power 11^4.
Links
- Robert Israel, Table of n, a(n) for n = 1..2000
Programs
-
Maple
filter:= proc(n) local L,i,x; L:= convert(n,base,10); x:= add(10^(i-1)*L[-i],i=1..nops(L)); igcd(ifactors(n+x)[2][..,2])>1; end proc: select(filter, [$1..20000]); # Robert Israel, Oct 24 2023
-
PARI
isok(k) = ispower(k + fromdigits(Vecrev(digits(k)))); \\ Michel Marcus, Oct 24 2023
Extensions
More terms from Robert Israel, Oct 24 2023