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.

A219196 A subsequence of the denominators of the Bernoulli numbers: a(n) = A027642(A131577(n)).

This page as a plain text file.
%I A219196 #39 Feb 16 2025 08:33:18
%S A219196 1,2,6,30,30,510,510,510,510,131070,131070,131070,131070,131070,
%T A219196 131070,131070,131070,8589934590,8589934590,8589934590,8589934590,
%U A219196 8589934590,8589934590,8589934590,8589934590,8589934590,8589934590,8589934590,8589934590,8589934590,8589934590
%N A219196 A subsequence of the denominators of the Bernoulli numbers: a(n) = A027642(A131577(n)).
%C A219196 Conjecture: a(15) = a(16) = 131070, a(17) through a(32) = 8589934590.
%C A219196 Number of different terms: 1, 1, 1, 2, 4, ... = abs(A141531)?
%C A219196 Factorization of terms from 2:
%C A219196          2 = 2
%C A219196          6 = 2*3
%C A219196         30 = 2*3*5
%C A219196        510 = 2*3*5*17
%C A219196     131070 = 2*3*5*17*257
%C A219196 8589934590 = 2*3*5*17*257*65537.
%C A219196 Note that all factors shown are 2 or Fermat numbers (see A092506, A019434, A000215).
%C A219196 Empirical: using the von Staudt-Clausen theorem, terms a(17) through a(4215) are all 8589934590. - _Simon Plouffe_, Sep 20 2015
%C A219196 Using the von Staudt-Clausen theorem, a(n) is the product of 2 and all Fermat primes <= 2^(n-1)+1: see A019434.  The only known Fermat primes are 3,5,17,257,65537; it is known that there are no others < 2^(2^33)+1, so that a(n) = 8589934590 for n <= 2^33 = 8589934592. - _Robert Israel_, Sep 21 2015
%H A219196 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/vonStaudt-ClausenTheorem.html">von Staudt-Clausen Theorem</a>
%t A219196 a[n_] := a[n] = Times @@ Select[ Divisors[2^(n-1)] + 1, PrimeQ]; a[0] = 1; Table[a[n], {n, 0, 20}] (* _Jean-François Alcover_, Dec 07 2012 *)
%o A219196 (PARI) a(n) = denominator(bernfrac(1<<n--)); \\ _Michel Marcus_, Aug 14 2013
%Y A219196 Cf. A092506, A019434, A000215.
%K A219196 nonn
%O A219196 0,2
%A A219196 _Paul Curtz_, Nov 14 2012
%E A219196 Extended up to a(20) by _Jean-François Alcover_, Dec 07 2012
%E A219196 More terms from _Michel Marcus_, Sep 27 2015