|
Search: id:A075786
|
|
|
| A075786 |
|
Palindromic perfect powers. |
|
+0
4
|
|
| 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; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
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.
Adjacent sequences: A075783 A075784 A075785 this_sequence A075787 A075788 A075789
Sequence in context: A118895 A110811 A128827 this_sequence A046450 A077271 A072037
|
|
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
|
|
|
Search completed in 0.002 seconds
|
