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!)
 A091624 Lesser of consecutive primes whose sum is a perfect power (A001597). 8
 3, 17, 47, 61, 71, 107, 283, 881, 1151, 1913, 2591, 3527, 4049, 4093, 6047, 7193, 7433, 10973, 15137, 20807, 21617, 24197, 26903, 28793, 34847, 37039, 46817, 53129, 56443, 69191, 74489, 83231, 84047, 98563, 103049, 103967, 109507, 110441, 112337 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Hans Havermann, Table of n, a(n) for n = 1..10000 MATHEMATICA NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; PrimeExponents[n_] := Flatten[ Table[ #[[2]], {1}] & /@ FactorInteger[n]]; p = q = 2; l = {}; Do[q = NextPrim[p]; If[ Apply[ GCD, PrimeExponents[p + q]] > 1, AppendTo[l, p]]; p = q, {n, 2, 13000}] CROSSREFS Cf. A071087. Cf. A061275. Sequence in context: A126587 A108126 A106256 * A106078 A087908 A152472 Adjacent sequences:  A091621 A091622 A091623 * A091625 A091626 A091627 KEYWORD nonn AUTHOR Robert G. Wilson v, Jan 24 2004 STATUS approved

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 May 9 03:59 EDT 2021. Contains 343685 sequences. (Running on oeis4.)