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 A119978 #7 Feb 16 2025 08:33:01 %S A119978 2,12,48,2016,221760,6918912,1881944064,3079544832,1558249684992, %T A119978 1265298744213504,7591792465281024,919297051250393088, %U A119978 36771882050015723520,13282003796465679335424 %N A119978 Denominator of the n-th Artin product. %C A119978 Artin's constant (A005596) is equal to Product[1-1/(Prime[k]*(Prime[k]-1)),{k,1,Infinity}]. n-th Artin product is Product[1-1/(Prime[k]*(Prime[k]-1)),{k,1,n}]. %H A119978 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ArtinsConstant.html">Artin's Constant</a>. %F A119978 a(n) = Denominator[ Product[ 1 - 1/(Prime[k]*(Prime[k]-1)), {k,1,n}]]. %t A119978 Table[Denominator[Product[1-1/(Prime[k]*(Prime[k]-1)),{k,1,n}]],{n,1,20}] %Y A119978 Cf. A119534, A091568, A091567, A005596, A048296. %K A119978 frac,nonn %O A119978 1,1 %A A119978 _Alexander Adamchuk_, Aug 03 2006