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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A261130 a(n) = Product(p prime | n < p <= 2*n). 2
1, 2, 3, 5, 35, 7, 77, 143, 143, 2431, 46189, 4199, 96577, 7429, 7429, 215441, 6678671, 392863, 392863, 765049, 765049, 31367009, 1348781387, 58642669, 2756205443, 2756205443, 2756205443, 146078888479, 146078888479, 5037203051, 297194980009, 584803025179 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

Essentially the same as A068111. - R. J. Mathar, Nov 23 2015

LINKS

Table of n, a(n) for n=0..31.

EXAMPLE

a(0) = 1 because the empty product is 1 by convention.

a(4) = 35 because {p prime | 4 < p <= 8} = {5, 7}.

MAPLE

a := n -> convert(select(isprime, {$n+1..2*n}), `*`):

print(seq(a(n), n=0..31));

MATHEMATICA

Join[{1}, Table[Times@@Prime[Range[PrimePi[n]+1, PrimePi[2n]]], {n, 40}]] (* Harvey P. Dale, May 09 2017 *)

PROG

(PARI) A261130(n, P=1)={forprime(p=n+1, 2*n, P*=p); P} \\ M. F. Hasler, Nov 25 2015

CROSSREFS

Cf. A034386.

Sequence in context: A276043 A041019 A041977 * A271387 A089213 A029499

Adjacent sequences:  A261127 A261128 A261129 * A261131 A261132 A261133

KEYWORD

nonn

AUTHOR

Peter Luschny, Oct 31 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 June 25 17:47 EDT 2019. Contains 324353 sequences. (Running on oeis4.)