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 A077144 #15 May 07 2025 23:08:24 %S A077144 1,3,34,960,49500,3538080,404020145,73780761600,15590323138443, %T A077144 4627678068946516,1712182437990539536,709629581496779727567, %U A077144 434911027744132649793916,234745940945367262055489361 %N A077144 a(n) = floor(product of next n composite numbers / sum of next n composite numbers). %H A077144 Harvey P. Dale, <a href="/A077144/b077144.txt">Table of n, a(n) for n = 1..225</a> %t A077144 Module[{nn=200,cmps,tr},cmps=Select[Range[nn],CompositeQ];tr=Floor[(Sqrt[8Length[cmps]+1]-1)/2];Floor[(Times@@#)/ Total[ #]]&/@ TakeList[ cmps,Range[tr]]] (* _Harvey P. Dale_, Nov 03 2024 *) %o A077144 (PARI) k=3; for(n=1, 20, p=1; s=0; for(i=1, n, while(isprime(k), k=k+1); p=p*k; s=s+k; k=k+1); print1(floor(p/s)",")) %Y A077144 Cf. A077143, A077145. %K A077144 nonn %O A077144 1,2 %A A077144 _Amarnath Murthy_, Oct 30 2002 %E A077144 More terms from _Ralf Stephan_, Mar 24 2003