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 A110374 #10 Jun 30 2021 07:44:50 %S A110374 6,30,300,2100,21840,236880,2731680,30048480,400498560,5206481280, %T A110374 79117758720,1273944672000,21690789120000,368743415040000, %U A110374 6993068898816000,132868309077504000,2779011281958912000,60792138929313792000,1388517998616612864000 %N A110374 a(n) = Sum_{composite c <= n} n!/c. %H A110374 Michael S. Branicky, <a href="/A110374/b110374.txt">Table of n, a(n) for n = 4..449</a> %e A110374 a(8) = 8! * (1/4 + 1/6 + 1/8) = 21840. %p A110374 a:=proc(n) local s,i :s:=0: for i from 4 to n do if isprime(i)=false then s:=s+1/i else s:=s: fi od: n!*s; end; seq(a(n),n=4..23); # _Emeric Deutsch_, Jul 24 2005 %o A110374 (Python) %o A110374 from sympy import factorial, isprime, Rational %o A110374 def a(n): return factorial(n) * sum(Rational(1, c) for c in range(4, n+1) if not isprime(c)) %o A110374 print([a(n) for n in range(4, 23)]) # _Michael S. Branicky_, Jun 30 2021 %Y A110374 Cf. A110373. %K A110374 easy,nonn %O A110374 4,1 %A A110374 _Amarnath Murthy_, Jul 24 2005 %E A110374 More terms from _Emeric Deutsch_, Jul 24 2005 %E A110374 a(21) and beyond from _Michael S. Branicky_, Jun 30 2021