This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A072236 #24 Jun 11 2024 04:37:02 %S A072236 1,2,7,36,297,2905,39083,603698,11637502,288086265,7728273214, %T A072236 251460107734,9155428058351,353182833587645,15035130777416118, %U A072236 726840450530910033,39326730322451969003,2211193504550790268932,137315317472893091758587 %N A072236 Numbers of primes between successive primorials. %H A072236 Tomás Oliveira e Silva, <a href="http://sweet.ua.pt/tos/primes.html">Tables of values of pi(x) and of pi2(x)</a> [From _Donovan Johnson_, Apr 25 2010] %F A072236 a(n) = A000849(n+1) - A000849(n). - _Amiram Eldar_, Jun 11 2024 %e A072236 There are 3 primes less than 6, 7 primes between 6 and 30 and 36 primes between 30 and 210. %t A072236 Table[ PrimePi[ Product[Prime[i], {i, 1, n}]] - PrimePi[ Product[ Prime[i], {i, 1, n - 1}]], {n, 1, 12}] %t A072236 Join[{1},Differences[PrimePi/@Rest[FoldList[Times,1,Prime[Range[12]]]]]] (* _Harvey P. Dale_, Mar 16 2012 *) (* Mathematica's implementation of PrimePi will not work for the 13th primorial because it's too large *) %Y A072236 Cf. A002110, A000849. %K A072236 nonn,hard,more %O A072236 0,2 %A A072236 Stephan Wagler (stephanwagler(AT)aol.com), Jul 05 2002 %E A072236 Edited by _Robert G. Wilson v_, Jul 08 2002 %E A072236 a(13)-a(14) from _Donovan Johnson_, Apr 25 2010 %E A072236 a(15)-a(18) calculated using the data at A000849 and added by _Amiram Eldar_, Jun 11 2024