|
| |
|
|
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;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
Up to 10^12, there are only 43 perfect powers which are palindromic.
|
|
|
LINKS
|
Table of n, a(n) for n=1..31.
|
|
|
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 A084093
Adjacent sequences: A075783 A075784 A075785 * A075787 A075788 A075789
|
|
|
KEYWORD
|
easy,base,nonn
|
|
|
AUTHOR
|
Zak Seidov, Oct 10 2002
|
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v, Oct 11 2002
|
|
|
STATUS
|
approved
|
| |
|
|
