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 A132958 #10 Sep 29 2017 02:49:34
%S A132958 1,1,7,11,121,479,5041,18479,423361,1844639,39916801,298710719,
%T A132958 6227020801,43606442879,1536517382401,9589093113599,355687428096001,
%U A132958 4259374594675199,121645100408832001,1135353600039859199
%N A132958 a(n) = n!*Sum_{d|n} (-1)^(d+1)/d!.
%H A132958 G. C. Greubel, <a href="/A132958/b132958.txt">Table of n, a(n) for n = 1..445</a>
%F A132958 E.g.f.: Sum_{k>0} (-x)^k/(k!*(x^k-1)) or Sum_{k>0}(1-exp(-x^k)).
%t A132958 f[n_] := Block[{d = Divisors@n}, Plus @@ (n!*(-1)^(d + 1)/d!)]; Array[f, 19] (* or *) (* _Robert G. Wilson v_, Sep 13 2007 *)
%t A132958 Rest[ Range[0, 20]! CoefficientList[ Series[ Sum[(-x)^k/(k!*(x^k - 1)), {k, 25}], {x, 0, 20}], x]] (* or *) (* _Robert G. Wilson v_, Sep 13 2007 *)
%t A132958 Rest[ Range[0, 20]! CoefficientList[ Series[ Sum[1 - Exp[ -x^k], {k, 25}], {x, 0, 20}], x]] (* _Robert G. Wilson v_, Sep 13 2007 *)
%o A132958 (PARI) a(n) = n!*sumdiv(n, d, (-1)^(d+1)/d!); \\ _Michel Marcus_, Sep 29 2017
%Y A132958 Cf. A057625, A132959, A132960, A132961, A132962, A132963.
%K A132958 easy,nonn
%O A132958 1,3
%A A132958 _Vladeta Jovovic_, Sep 06 2007
%E A132958 More terms from _Robert G. Wilson v_, Sep 13 2007