|
| |
|
|
A075786
|
|
Palindromic perfect powers.
|
|
3
| |
|
|
1, 4, 8, 9, 121, 343, 484, 676, 1331, 10201, 12321, 14641, 40804, 44944, 69696, 94249, 698896, 1002001, 1030301, 1234321, 1367631, 4008004, 5221225, 6948496, 100020001, 102030201, 104060401, 121242121, 123454321, 125686521, 400080004
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Up to 10^12, there are only 43 perfect powers which are palindromic.
|
|
|
MATHEMATICA
| a = {}; Do[q = IntegerDigits[n]; p = FromDigits[ Join[ q, Reverse[ Drop[q, -1]]]]; If[ Apply[ GCD, Last[ Transpose[ FactorInteger[p]]]] > 1, a = Append[a, p]]; p = FromDigits[ Join[ q, Reverse[q]]]; If[ Apply[ GCD, Last[ Transpose[ FactorInteger[p]]]] > 1, a = Append[a, p]], {n, 1, 10^5}]
|
|
|
CROSSREFS
| Cf. A001597, A076443.
Sequence in context: A118895 A110811 A128827 * A046450 A077271 A072037
Adjacent sequences: A075783 A075784 A075785 * A075787 A075788 A075789
|
|
|
KEYWORD
| easy,base,nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Oct 10 2002
|
|
|
EXTENSIONS
| Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 11 2002
|
| |
|
|
