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 A075267 #28 Aug 15 2025 08:42:05
%S A075267 2,24,8,2880,288,362880,17280,29030400,89600,958003200,17418240,
%T A075267 31384184832000,402361344000,62768369664000,295206912,
%U A075267 512189896458240000,342372925440000,919636959090769920000,5377993912811520000,674400436666564608000000,89903156428800000
%N A075267 Denominator of the coefficient of x^n in log(-log(1-x)/x).
%H A075267 Robert Israel, <a href="/A075267/b075267.txt">Table of n, a(n) for n = 1..443</a>
%F A075267 a(n) = denominator(Sum_{k=1..n} (k-1)!*(-1)^(n-k-1)*binomial(n,k)*Stirling1(n+k,k)/(n+k)!). - _Vladimir Kruchinin_, Aug 14 2025
%p A075267 S:= series(log(-log(1-x)/x),x,51):
%p A075267 seq(denom(coeff(S,x,j)),j=1..50); # _Robert Israel_, May 17 2016
%t A075267 Denominator[ CoefficientList[ Series[ Log[ -Log[1 - x]/x], {x, 0, 18}], x]]
%o A075267 (Magma) m:=25; R<x>:=PowerSeriesRing(Rationals(), m); b:=Coefficients(R!( Log(-Log(1-x)/x) )); [Denominator(b[n]): n in [1..m-2]]; // _G. C. Greubel_, Oct 29 2018
%Y A075267 Cf. A075266 (numerator), A075264, A053657.
%K A075267 frac,nonn
%O A075267 1,1
%A A075267 _Paul D. Hanna_, Sep 15 2002
%E A075267 Edited by _Robert G. Wilson v_, Sep 17 2002