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 A110373 #9 Sep 03 2017 03:30:08
%S A110373 1,5,20,124,744,5928,47424,426816,4268160,50578560,606942720,
%T A110373 8369256960,117169597440,1757543961600,28120703385600,498974747443200,
%U A110373 8981545453977600,177051737331302400,3541034746626048000
%N A110373 a(n) = Sum_{prime p <= n} n!/p.
%H A110373 Harvey P. Dale, <a href="/A110373/b110373.txt">Table of n, a(n) for n = 2..449</a>
%e A110373 a(7) = 7!(1/2 + 1/3 + 1/5 + 1/7) = 5928.
%p A110373 a:=proc(n) local s, i: s:=0: for i from 2 to n do if isprime(i)=true then s:=s+1/i else s:=s: fi: od: n!*s: end: seq(a(n),n=2..23); # _Emeric Deutsch_, Jul 24 2005
%t A110373 Table[n! Total[1/Prime[Range[PrimePi[n]]]],{n,20}] (* _Harvey P. Dale_, Mar 06 2017 *)
%Y A110373 Cf. A110374.
%K A110373 easy,nonn
%O A110373 2,2
%A A110373 _Amarnath Murthy_, Jul 24 2005
%E A110373 More terms from _Emeric Deutsch_, Jul 24 2005