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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A099478 Least k such that k*2^n*(2^n-1) - 1 is prime. 1
2, 1, 3, 1, 1, 4, 3, 6, 1, 1, 4, 2, 9, 4, 9, 14, 4, 1, 3, 4, 36, 5, 25, 4, 10, 4, 18, 3, 21, 9, 9, 21, 16, 65, 12, 8, 51, 1, 22, 2, 30, 6, 10, 63, 1, 30, 15, 3, 10, 1, 22, 57, 202, 4, 3, 53, 1, 34, 12, 10, 22, 29, 28, 31, 7, 6, 70, 29, 16, 94, 37, 51, 30, 56, 19, 23, 70, 50, 99, 16, 34, 5 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Least k such that k*A020522(n)-1 is prime. - Michel Marcus, Apr 13 2021

LINKS

Robert Israel, Table of n, a(n) for n = 1..2090

EXAMPLE

1*2^6*(2^6-1) - 1 = 4031 = 29*139

2*2^6*(2^6-1) - 1 = 8063 = 11*733

3*2^6*(2^6-1) - 1 = 12095 = 5*2419

4*2^6*(2^6-1) - 1 = 16127, which is prime, so a(6)=4.

MAPLE

f:= proc(n) local c, k;

  c:= 2^n*(2^n-1);

for k from 1 do if isprime(c*k-1) then return k fi od

end proc:

map(f, [$1..100]); # Robert Israel, Apr 12 2021

PROG

(PARI) a(n) = my(k=1); while(!isprime(k*2^n*(2^n-1) - 1), k++); k; \\ Michel Marcus, Apr 13 2021

CROSSREFS

Cf. A020522.

Sequence in context: A115139 A198788 A112543 * A133913 A209485 A209344

Adjacent sequences:  A099475 A099476 A099477 * A099479 A099480 A099481

KEYWORD

nonn

AUTHOR

Pierre CAMI, Nov 18 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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 21 22:29 EDT 2021. Contains 348155 sequences. (Running on oeis4.)