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!)
A140293 Numbers n such that n!/n#-1 is prime. 4
4, 5, 6, 7, 8, 16, 17, 21, 34, 39, 45, 50, 72, 73, 76, 133, 164, 202, 216, 221, 280, 281, 496, 605, 2532, 2967, 3337, 8711, 10977, 13724, 15250, 18160, 20943, 33684, 41400 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

a(31) > 14000. - Giovanni Resta, Apr 02 2013

a(36) > 50000. - Roger Karpin, Jul 07 2015

LINKS

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

Chris Caldwell, Compositorial

Chris Caldwell, Compositorial list search

FORMULA

n such that n!/n# - 1 is prime, where n# is the primorial function n# = product(i = 1 .. pi(n), prime(i)), where pi(n) is the prime counting function.

EXAMPLE

7!/7# = 5040/210 = 24. 24 - 1 = 23, which is prime.

MATHEMATICA

Select[Range[16], PrimeQ[#!/(Times@@Prime[Range[PrimePi[#]]]) - 1] &] (* Alonso del Arte, Nov 28 2014 *)

PROG

(PARI) g(n) = for(x=4, n, y=x!/primorial(x)-1; z=nextprime(y+1); if(ispseudoprime(y), print1(x", ")))

CROSSREFS

Cf. A140294, A140315, A049420, A049421, A049614.

Sequence in context: A071623 A274552 A280682 * A075341 A309358 A143789

Adjacent sequences:  A140290 A140291 A140292 * A140294 A140295 A140296

KEYWORD

nonn,more

AUTHOR

Cino Hilliard, May 25 2008

EXTENSIONS

a(18)-a(27) from Giovanni Resta, Mar 28 2013

a(28)-a(30) from Giovanni Resta, Apr 02 2013

a(31) from Roger Karpin, Nov 28 2014

a(32)-a(33) from Daniel Heuer, ca Aug 2000

a(34)-a(35) from Serge Batalov, Feb 09 2015

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 April 1 14:52 EDT 2020. Contains 333163 sequences. (Running on oeis4.)