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!)
A127600 Integer part of cube root of product of first n primes. 7
1, 1, 3, 5, 13, 31, 79, 213, 606, 1863, 5853, 19505, 67257, 235631, 850352, 3194167, 12434883, 48949883, 198812307, 823245530, 3440622312, 14763161313, 64397952985, 287520444756, 1321070444052, 6152237618431, 28838910052201 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..898

MAPLE

Res:= NULL:

p:= 1: r:= 1:

for n from 1 to 50 do

  p:=nextprime(p);

  r:= r*p;

  Res:= Res, floor(r^(1/3));

od:

Res; # Robert Israel, Nov 10 2017

MATHEMATICA

a = {}; Do[b = 1; Do[b = b Prime[x], {x, 1, n}]; AppendTo[a, Floor[b^(1/3)]], {n, 1, 100}]; a (* Artur Jasinski *)

Floor[Surd[#, 3]]&/@Rest[FoldList[Times, 1, Prime[Range[30]]]] (* Harvey P. Dale, Jun 23 2014 *)

PROG

(PARI) a(n) = sqrtnint(prod(k=1, n, prime(k)), 3); \\ Michel Marcus, Nov 10 2017

CROSSREFS

Cf. A002110, A060797.

Sequence in context: A062304 A281874 A135532 * A262237 A051401 A304357

Adjacent sequences:  A127597 A127598 A127599 * A127601 A127602 A127603

KEYWORD

nonn

AUTHOR

Artur Jasinski, Jan 19 2007

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 May 14 19:53 EDT 2021. Contains 343903 sequences. (Running on oeis4.)