cp's OEIS Frontend

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.

A119978 Denominator of the n-th Artin product.

This page as a plain text file.
%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