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!)
 A100361 Numbers n such that 2^n-n+1 is prime. 7
 0, 1, 2, 4, 6, 16, 18, 54, 58, 100, 120, 504, 1302, 3234, 14748, 16102, 22782, 34656, 64764, 70866, 194940, 274074, 313344, 331416, 354640 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS a(21) > 150000. - Giovanni Resta, Mar 18 2014 a(26) > 5*10^5. - Robert Price, Oct 13 2014 LINKS MAPLE A100361:=n->`if`(isprime(2^n-n+1), n, NULL): seq(A100361(n), n=0..10^3); # Wesley Ivan Hurt, Oct 13 2014 MATHEMATICA {ta={{0}}, tb={{0}}}; Do[g=n; s=2^n-n+1; If[PrimeQ[s], Print[n]; ta=Append[ta, n]; tb=Append[tb, s]], {n, 1, 10000}]; {ta, tb, g} PROG (PARI) is(n)=ispseudoprime(2^n-n+1) \\ Charles R Greathouse IV, Feb 20 2017 CROSSREFS Cf. A001580, A069539, A052007, A048744, A100357-A100359, A061421. Sequence in context: A287681 A333021 A114874 * A259939 A069654 A330359 Adjacent sequences:  A100358 A100359 A100360 * A100362 A100363 A100364 KEYWORD hard,more,nonn AUTHOR Labos Elemer, Nov 19 2004 EXTENSIONS a(15)-a(20) from Giovanni Resta, Mar 18 2014 a(21)-a(25) from Robert Price, Oct 13 2014 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 September 18 16:05 EDT 2020. Contains 337169 sequences. (Running on oeis4.)