|
Search: id:A107607
|
|
|
| A107607 |
|
Numbers n such that pp = prime(n) - n is a perfect power. |
|
+0
4
|
|
| 1, 2, 12, 15, 38, 39, 100, 118, 152, 190, 212, 258, 352, 462, 542, 690, 741, 746, 1285, 1396, 1417, 1632, 2119, 2243, 2318, 2603, 3370, 3777, 4073, 4155, 4485, 4522, 4600, 4719, 5317, 5446, 6697, 6748, 6985, 7144, 7520, 7595, 9492, 9551, 12010, 12985
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Cf. A001597 = {1,4,8,9,16,25,27,32,36...} (Perfect powers: m^k where m is an integer and k >= 2.) Corresponding pp's in A107608.
|
|
EXAMPLE
|
pp = prime(12) - 12 = 37 - 12 = 25 = 5^2.
|
|
MATHEMATICA
|
f[n_] := Prime[n] - n; Select[Range[10^4], ! GCD @@ Last /@ FactorInteger[f[ # ]] == 1 &] (*Chandler*)
|
|
CROSSREFS
|
Cf. A001597, A107605, A107606, A107608.
Adjacent sequences: A107604 A107605 A107606 this_sequence A107608 A107609 A107610
Sequence in context: A118516 A077103 A036499 this_sequence A102975 A120300 A071566
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), May 17 2005
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), May 21 2005
|
|
|
Search completed in 0.002 seconds
|
