The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A205236 Least prime p > 3 such that 2^n + p*2^k - 1 is prime for some k with n/3 < k < n+1 4
5, 5, 5, 7, 5, 5, 5, 7, 5, 5, 5, 11, 5, 5, 5, 7, 5, 5, 5, 7, 5, 5, 5, 11, 5, 5, 5, 7, 5, 5, 5, 7, 5, 5, 5, 11, 5, 5, 5, 7, 5, 5, 5, 7, 5, 5, 13, 11, 5, 5, 5, 7, 5, 5, 5, 7, 5, 5, 11, 17, 7, 5, 5, 7, 5, 5, 5, 7, 5, 5, 5, 11, 7, 5, 5, 7, 5, 5, 7, 7, 11, 5, 5 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
The prime p seems to be < 31.
LINKS
EXAMPLE
2^1+5*2^1-1=11 prime so p=5 for n=1.
2^2+5*2^2-1=23 prime so p=5 for n=2.
2^3+5*2^3-1=47 prime so p=5 for n=3.
PROG
PFGW64 from Primeform group and SCRIPTIFY
Command : pfgw64 -f in.txt
in.txt file :
SCRIPT
DIM nn, 0
DIM mm
DIM kk
DIMS tt
OPENFILEOUT myfile, prem.txt
LABEL loopn
SET nn, nn+1
IF nn>10800 THEN END
SET kk, 2
LABEL loopk
SET kk, kk+1
SET mm, nn/3
LABEL loopm
SET mm, mm+1
IF mm>nn THEN GOTO loopk
SETS tt, %d, %d, %d\ ; nn; p(kk); mm
PRP 2^nn+p(kk)*2^mm-1, tt
IF ISPRIME THEN GOTO a
IF ISPRP THEN GOTO a
GOTO loopm
LABEL a
WRITE myfile, tt
GOTO loopn
CROSSREFS
Cf. A205237.
Sequence in context: A092279 A159002 A127934 * A266948 A176172 A204911
KEYWORD
nonn
AUTHOR
Pierre CAMI, Jan 24 2012
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 13 17:28 EDT 2024. Contains 372522 sequences. (Running on oeis4.)