|
Search: id:A075787
|
|
|
| A075787 |
|
Even-digit perfect powers. |
|
+0
3
|
|
| 4, 8, 64, 400, 484, 2048, 4624, 6084, 6400, 8000, 8464, 26244, 28224, 40000, 40804, 48400, 64000, 68644, 88804, 228484, 242064, 248004, 446224, 462400, 608400, 640000, 806404, 824464, 846400, 868624, 2022084, 2226064, 2244004, 2624400
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[ If[ Union[ EvenQ[ IntegerDigits[n]]] == {True} && Apply[GCD, Last[ Transpose[ FactorInteger[n]]]] > 1, Print[n]], {n, 4, 2822399, 2}]
|
|
CROSSREFS
|
Cf. A001597 & A076442.
Sequence in context: A063083 A120777 A091095 this_sequence A086891 A117636 A051226
Adjacent sequences: A075784 A075785 A075786 this_sequence A075788 A075789 A075790
|
|
KEYWORD
|
easy,base,nonn
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), Oct 10 2002
|
|
EXTENSIONS
|
Edited, corrected and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Oct 11 2002
|
|
|
Search completed in 0.002 seconds
|
