The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A107607 Numbers n such that prime(n) - n is a perfect power. 3

%I

%S 1,2,12,15,38,39,100,118,152,190,212,258,352,462,542,690,741,746,1285,

%T 1396,1417,1632,2119,2243,2318,2603,3370,3777,4073,4155,4485,4522,

%U 4600,4719,5317,5446,6697,6748,6985,7144,7520,7595,9492,9551,12010,12985

%N Numbers n such that prime(n) - n is a perfect power.

%e Prime(12) - 12 = 37 - 12 = 25 = 5^2.

%t f[n_] := Prime[n] - n; Select[Range[10^4], ! GCD @@ Last /@ FactorInteger[f[ # ]] == 1 &] (* _Ray Chandler_, May 21 2005 *)

%o (PARI) isA107607(n)=(ispower(prime(n)-n) > 1) || (prime(n)-n == 1) \\ _Michael B. Porter_, Sep 28 2009

%Y Cf. A001597 (perfect powers), A107605, A107606, A107608 (associated prime(n)-n).

%K nonn

%O 1,2

%A _Zak Seidov_, May 17 2005

%E Extended by _Ray Chandler_, May 21 2005

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 26 16:43 EDT 2020. Contains 337374 sequences. (Running on oeis4.)