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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A060308 Largest prime <= 2n. 27
2, 3, 5, 7, 7, 11, 13, 13, 17, 19, 19, 23, 23, 23, 29, 31, 31, 31, 37, 37, 41, 43, 43, 47, 47, 47, 53, 53, 53, 59, 61, 61, 61, 67, 67, 71, 73, 73, 73, 79, 79, 83, 83, 83, 89, 89, 89, 89, 97, 97, 101, 103, 103, 107, 109, 109, 113, 113, 113, 113, 113, 113, 113, 127, 127, 131 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

a(n) is the smallest k such that C(2n,n) divides k!. - Benoit Cloitre, May 30 2002

a(n) is largest prime factor of C(2n,n) = (2n)!/(n!)^2. - Alexander Adamchuk, Jul 11 2006

a(n) is also the largest prime in the interval [n,2n]. - Peter Luschny, Mar 04 2011

Odd prime p repeats (q-p)/2 times, where q > p is the next prime. In particular, every lesser of twin primes (A001359) occurs 1 time,  every lesser more than 3 of cousin primes (A023200) occurs 2 times, etc. - Vladimir Shevelev, Mar 12 2012

a(n) = A007917(A005843(n)) = A226078(n,A067434(n)). - Reinhard Zumkeller, May 25 2013

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

FORMULA

a(n) = Max[FactorInteger[(2n)!/(n!)^2]]. - Alexander Adamchuk, Jul 11 2006

a(n) = A006530(A000142(2*n)) and a(n) = A006530(A056040(2*n)). - Peter Luschny, Mar 04 2011

a(n) ~ 2*n as n tends to infinity. - Vladimir Shevelev, Mar 12 2012

a(n) = A007917(A005843(n)). - Michel Marcus, Nov 25 2015

EXAMPLE

n=1, 2n=2, p(1) = 2 = a(1) is the largest prime not exceeding 2.

MAPLE

seq (prevprime(2*i+1), i=1..256);

seq(max(op(select(isprime, [$n..2*n]))), n=1..66); # Peter Luschny, Mar 04 2011

MATHEMATICA

Table[Max[FactorInteger[(2n)!/(n!)^2]], {n, 1, 100}] - Alexander Adamchuk, Jul 11 2006

NextPrime[2*Range[80]+1, -1] (* Harvey P. Dale, Apr 23 2017 *)

PROG

(PARI) a(n)=precprime(2*n) \\ Charles R Greathouse IV, May 24 2013

(Haskell)

a060308 = a007917 . a005843 -- Reinhard Zumkeller, May 25 2013

(MAGMA) [NthPrime(#PrimesUpTo(2*n)): n in [2..100]]; // Vincenzo Librandi, Nov 25 2015

CROSSREFS

Cf. A007917 (largest prime <= n), A005843 (2n).

Cf. A020482, A049653, A060266-A060268, A060264. Apart from initial term, same as A060265.

Sequence in context: A156900 A039734 A020482 * A224911 A270176 A064142

Adjacent sequences:  A060305 A060306 A060307 * A060309 A060310 A060311

KEYWORD

nonn,easy

AUTHOR

Labos Elemer, Mar 27 2001

EXTENSIONS

More terms from Alexander Adamchuk, Jul 11 2006

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 24 03:21 EST 2018. Contains 299595 sequences. (Running on oeis4.)