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 A078155 #11 Dec 13 2018 19:06:17
%S A078155 0,0,0,0,4,22,80,304,1043,3538,12094,42979,156237,587926,2283038,
%T A078155 9142910,37708601,160014979,697523776,3119511496,14295524835,
%U A078155 67052144163,321571055089,1575370699764,7876854373196,40164235356266,208699490940770
%N A078155 A078152(n!).
%H A078155 Michael De Vlieger, <a href="/A078155/b078155.txt">Table of n, a(n) for n = 1..807</a>
%F A078155 a(n) = A078152(n!) = A055086(n!) - A000005(n!).
%t A078155 Table[ Length[ Union[ Table[ Floor[w!/j], {j, 1, w!}]]] - DivisorSigma[0, w! ], {w, 1, 11}]
%t A078155 (* Second program: *)
%t A078155 Array[Floor@ Sqrt[4 # + 1] - 1 - DivisorSigma[0, #] &[#!] &, 27] (* _Michael De Vlieger_, Dec 13 2018 *)
%Y A078155 Cf. A078152, A078153, A078154, A078156, A078157, A078158.
%K A078155 nonn
%O A078155 1,5
%A A078155 _Labos Elemer_, Nov 27 2002
%E A078155 Extended by _Robert G. Wilson v_, Dec 02 2002
%E A078155 a(11) corrected and terms a(12) onward added by _Max Alekseyev_, Feb 12 2012