A079266 Subprimorials, extrapolation from primorials by analogy with subfactorials.

0, 1, 2, 11, 77, 850, 11047, 187806, 3568317, 82071280, 2380067130, 73782081030, 2729936998114, 111927416922654, 4812878927674125, 226205309600683885, 11988881408836245894, 707344003121338507758, 43147984190401648973266

Offset

0,3

Links

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

Formula

a(n) = Round(Prime(n)#/e), where p# = p primorial, with Prime(0)# = 1.

Example

a(3) = 11 because Prime(3) = 5, 5# = 30, 30/e = 11.036...

Mathematica

Table[Round[Times @@ Prime@Range@n/E], {n, 18}] (* Robert G. Wilson v, Apr 30 2009 *)
Join[{0}, Round[FoldList[Times, Prime[Range[20]]]/E]] (* Harvey P. Dale, Oct 22 2023 *)

Crossrefs

Cf. A002110, A000166.

See A121572 for a different definition of subprimorial.

Sequence in context: A006766 A120380 A369542 * A094569 A378670 A151418

Adjacent sequences: A079263 A079264 A079265 * A079267 A079268 A079269

Keyword

nonn

Author

Michael Joseph Halm, Feb 05 2003

Extensions

Edited by Franklin T. Adams-Watters, Aug 08 2006

More terms from Robert G. Wilson v, Apr 30 2009

Status

approved