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 A135667 #10 Jul 08 2025 18:53:54
%S A135667 3,4,6,8,10,12,14,16,19,21,23,25,28,30,32,34,37,39,41,43,46,48,50,52,
%T A135667 55,57,59,62,64,66,68,71,73,75,78,80,82,84,87,89,91,94,96,98,101,103,
%U A135667 105,108,110,112,114,117,119,121,124,126,128,131,133,135,138
%N A135667 Least k such that k!! > prime(1)*prime(2)*...*prime(n) where prime(n) is the n-th prime.
%t A135667 With[{prml=FoldList[Times,Prime[Range[70]]]},Table[Module[{k=1},While[k!!<=prml[[n]],k++];k],{n,70}]] (* _Harvey P. Dale_, Jul 08 2025 *)
%o A135667 (PARI) dbf(n) = prod(i = 0, floor((n-1)/2), n - 2*i );
%o A135667 a(n) = pr = prod(i = 1, n, prime(i)); k = 1; while(dbf(k) <= pr, k++); k; \\ _Michel Marcus_, Oct 13 2013
%Y A135667 Cf. A002110, A006882, A073071.
%K A135667 nonn
%O A135667 1,1
%A A135667 _Zak Seidov_, May 01 2008
%E A135667 More terms from _Michel Marcus_, Oct 13 2013