A060193 Partial products of A060191.
2, 14, 154, 2926, 67298, 2490026, 102091066, 5410826498, 319238763382, 22665952200122, 1654614510608906, 147260691444192634, 14284287070086685498, 1528418716499275348286, 166597640098421012963174, 21824290852893152698175794
Offset: 0
Keywords
Programs
-
Mathematica
Rest[FoldList[Times,1,Drop[Drop[Prime[Range[40]],{2,-1,4}], {2,-1,3}]]] (* Harvey P. Dale, Nov 26 2011 *)