login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A057704 Integers n such that the n-th primorial minus 1 is prime. 17
2, 3, 5, 6, 13, 24, 66, 68, 167, 287, 310, 352, 564, 590, 620, 849, 1552, 1849 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

a(19) > 25000. - Robert Price, Nov 22 2014

There are two versions of "primorial": this is using the definition in A002110. - Robert Israel, Dec 30 2014

LINKS

Table of n, a(n) for n=1..18.

Eric Weisstein's World of Mathematics, Primorial

Eric Weisstein's World of Mathematics, Integer Sequence Primes

FORMULA

a(n) = A000720(A006794(n)).

EXAMPLE

The 6th primorial is A002110(6) = 2*3*5*7*11*13 = 30030, and 30030 - 1 = 30029 is a prime, so 6 is in the sequence.

MAPLE

P:= 1:

p:= 1:

count:= 0:

for n from 1 to 1000 do

  p:= nextprime(p);

  P:= P*p;

  if isprime(P-1) then

    count:= count+1;

    A[count]:= n;

  fi

od:

seq(A[i], i=1..count); # Robert Israel, Dec 25 2014

MATHEMATICA

a057704[n_] :=

Flatten@Position[

Rest[FoldList[Times, 1, Prime[Range[n]]]] - 1, _Integer?PrimeQ]; a057704[500] (* Michael De Vlieger, Dec 25 2014 *)

CROSSREFS

Cf. A006794, A057705, A014545, A005234, A002110, A057706.

Sequence in context: A098833 A075371 A218948 * A078203 A253647 A131825

Adjacent sequences:  A057701 A057702 A057703 * A057705 A057706 A057707

KEYWORD

nonn,more

AUTHOR

Labos Elemer, Oct 24 2000

EXTENSIONS

Corrected by Holzer Werner, Nov 28 2002

STATUS

approved

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

Content is available under The OEIS End-User License Agreement .

Last modified January 29 11:12 EST 2015. Contains 253887 sequences.