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.

Showing 1-7 of 7 results.

A076335 Brier numbers: numbers that are both Riesel and Sierpiński [Sierpinski], or odd n such that for all k >= 1 the numbers n*2^k + 1 and n*2^k - 1 are composite.

Original entry on oeis.org

3316923598096294713661, 10439679896374780276373, 11615103277955704975673, 12607110588854501953787, 17855036657007596110949, 21444598169181578466233, 28960674973436106391349, 32099522445515872473461, 32904995562220857573541
Offset: 1

Views

Author

Olivier Gérard, Nov 07 2002

Keywords

Comments

a(1), a(4), and a(6)-a(8) computed by Christophe Clavier, Dec 31 2013 (see link below). 10439679896374780276373 had been found earlier in 2013 by Dan Ismailescu and Peter Seho Park (see reference below). a(3), a(5), and a(9) computed in 2014 by Emmanuel Vantieghem.
These are just the smallest examples known - there may be smaller ones.
There are no Brier numbers below 10^9. - Arkadiusz Wesolowski, Aug 03 2009
Other Brier numbers are 143665583045350793098657, 1547374756499590486317191, 3127894363368981760543181, 3780564951798029783879299, but these may not be the /next/ Brier numbers after those shown. From 2002 to 2013 these four numbers were given here as the smallest known Brier numbers, so the new entry A234594 has been created to preserve that fact. - N. J. A. Sloane, Jan 03 2014
143665583045350793098657 computed in 2007 by Michael Filaseta, Carrie Finch, and Mark Kozek.
It is a conjecture that every such number has more than 10 digits. In 2011 I have calculated that for any n < 10^10 there is a k such that either n*2^k + 1 or n*2^k - 1 has all its prime factors greater than 1321. - Arkadiusz Wesolowski, Feb 03 2016 [Editor's note: The comment below states that the conjecture is now proved. - M. F. Hasler, Oct 06 2021]
There are no Brier numbers below 10^10. For each n < 10^10, there exists at least one prime of the form n*2^k-1 or n*2^k+1 with k <= 356981. The largest necessary prime is 1355477231*2^356981+1. - Kellen Shenton, Oct 25 2020

Crossrefs

Extensions

Many terms reported in Problem 29 from "The Prime Problems & Puzzles Connection" from Carlos Rivera, May 30 2010
Entry revised by Arkadiusz Wesolowski, May 17 2012
Entry revised by Carlos Rivera and N. J. A. Sloane, Jan 03 2014
Entry revised by Arkadiusz Wesolowski, Feb 15 2014

A180247 Prime Brier numbers: primes p such that for all k >= 1 the numbers p*2^k + 1 and p*2^k - 1 are composite.

Original entry on oeis.org

10439679896374780276373, 21444598169181578466233, 105404490005793363299729, 178328409866851219182953, 239365215362656954573813, 378418904967987321998467, 422280395899865397194393, 474362792344501650476113, 490393518369132405769309
Offset: 1

Views

Author

Arkadiusz Wesolowski, Aug 19 2010

Keywords

Comments

WARNING: These are just the smallest examples known - there may be smaller ones. Even the first term is uncertain. - N. J. A. Sloane, Jun 20 2017
There are no prime Brier numbers below 10^10. - Arkadiusz Wesolowski, Jan 12 2011
It is a conjecture that every such number has more than 11 digits. In 2011 I have calculated that for any prime p < 10^11 there is a k such that either p*2^k + 1 or p*2^k - 1 has all its prime factors greater than 1321. - Arkadiusz Wesolowski, Feb 03 2016
The first term was found by Dan Ismailescu and Peter Seho Park and the next two by Christophe Clavier (see below). See also A076335. - N. J. A. Sloane, Jan 03 2014
a(4)-a(9) computed in 2017 by the author.

Crossrefs

Extensions

Entry revised by N. J. A. Sloane, Jan 03 2014
Entry revised by Arkadiusz Wesolowski, May 29 2017

A194600 Record values in A194591.

Original entry on oeis.org

0, 1, 2, 4, 5, 6, 11, 18, 20, 28, 70, 106, 208, 726, 910, 2906, 7431, 14073, 22394, 41422, 82587, 85461, 356981
Offset: 1

Views

Author

Arkadiusz Wesolowski, Aug 30 2011

Keywords

Comments

Indices of records are given by A217892.

Examples

			A194591(59) = 5 since A194591(109) = 6 is the next record value.
		

References

  • Wilfrid Keller, personal communication, 2010.

Crossrefs

Programs

  • Mathematica
    l = -1; Flatten[Table[k = 0; While[! PrimeQ[n*2^k - 1] && ! PrimeQ[n*2^k + 1], k++]; If[k > l, l = k, {}], {n, 10^5}]] (* Arkadiusz Wesolowski, Sep 04 2011 *)

Extensions

a(23)=A194637(22) from Wilfrid Keller, added by Max Alekseyev, Oct 18 2014

A194607 Record values in A194606.

Original entry on oeis.org

0, 1, 2, 4, 5, 6, 11, 17, 20, 28, 70, 99, 150, 726, 7431, 22394, 85461, 191207
Offset: 1

Views

Author

Arkadiusz Wesolowski, Aug 30 2011

Keywords

Comments

The index sequence of this one is 1, 3, 6, 15, 17, 29, 53, 115, 186, 220, 229, 1886, 5344, 5736, 66774, 1087403, 14747671, 158018119.
a(17) was found in 2000 by Wilfrid Keller and a(18) was found in 2003 by Patrick De Geest.

Examples

			A194606(53) = 11 since A194606(115) = 17 is the next record value.
		

References

  • Wilfrid Keller, personal communication, 2010.

Crossrefs

Programs

  • Mathematica
    l = -1; Flatten[Table[p = Prime[n]; k = 0; While[! PrimeQ[p*2^k - 1] && ! PrimeQ[p*2^k + 1], k++]; If[k > l, l = k, {}], {n, 10^4}]] (* Arkadiusz Wesolowski, Sep 04 2011 *)

A194637 Record values in A194636.

Original entry on oeis.org

0, 1, 2, 4, 5, 6, 11, 18, 20, 28, 70, 106, 150, 726, 2906, 7431, 14073, 22394, 41422, 82587, 85461, 356981
Offset: 1

Views

Author

Arkadiusz Wesolowski, Aug 31 2011

Keywords

Comments

The index sequence is 1, 3, 7, 24, 30, 55, 121, 168, 555, 687, 724, 7447, 26134, 28272, 324802, 419221, 4420051, 8467881, 50302257, 59186640, 135352084, 677738616, ... given by formula (A194639(n)+1)/2.

Examples

			A194636(55) = 6 since A194636(121) = 11 is the next record value.
		

References

  • Wilfrid Keller, personal communication, 2010.

Crossrefs

Programs

  • Mathematica
    l = -1; Flatten[Table[n = 2*n - 1; k = 0; While[! PrimeQ[n*2^k - 1] && ! PrimeQ[n*2^k + 1], k++]; If[k > l, l = k, {}], {n, 10^5}]] (* Arkadiusz Wesolowski, Sep 04 2011 *)

Formula

a(n) = A194591(A194639(n)) = A194636((A194639(n)+1)/2).

Extensions

a(22) was found in 2002 by Wilfrid Keller.

A103964 Record values in A040076.

Original entry on oeis.org

0, 1, 2, 3, 6, 8, 583, 6393, 9715, 33288, 3321063, 5054502, 31172165
Offset: 1

Views

Author

Lei Zhou, Feb 24 2005

Keywords

Comments

The index sequence of this sequence is 1, 3, 7, 17, 19, 31, 47, 383, 2897. A040076(2897)>8192, not yet found.
A064699 gives where the records occur.

Examples

			A040076(1)=0, so a(1)=0;
A040076(3)=1, so a(2)=1;
		

Crossrefs

Programs

  • Mathematica
    k = -1; n = 0; km = k; While[k < 8192, n++; k = 0; cp = n*(2^ k) + 1; While[(! PrimeQ[cp]) && (k < 8192), k++; cp = n*(2^k) + 1]; If[k > km, km = k; Print[{n, km}]]]

Extensions

Extended by T. D. Noe, Nov 15 2010
a(13) was found by PrimeGrid, added by Richard N. Smith, Jul 15 2019

A240113 Integers for which the smallest m in A040081 such that n*2^m - 1 is prime (A038699) increases.

Original entry on oeis.org

1, 13, 23, 43, 59, 88, 127, 148, 659
Offset: 1

Views

Author

Arkadiusz Wesolowski, Apr 01 2014

Keywords

Comments

Where records occur in A040081. A103963 gives the record values.
The next candidate is 2293.

Crossrefs

Programs

  • PARI
    a=0; for(n=1, 148, m=0; while(!ispseudoprime(n*2^m-1), m++); if(m>a, a=m; print1(n, ", ")));
Showing 1-7 of 7 results.