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.

Previous Showing 61-70 of 9098 results. Next

A092506 Prime numbers of the form 2^n + 1.

Original entry on oeis.org

2, 3, 5, 17, 257, 65537
Offset: 1

Views

Author

Jorge Coveiro, Apr 05 2004

Keywords

Comments

2 together with the Fermat primes A019434.
Obviously if 2^n + 1 is a prime then either n = 0 or n is a power of 2. - N. J. A. Sloane, Apr 07 2004
Numbers m > 1 such that 2^(m-2) divides (m-1)! and m divides (m-1)! + 1. - Thomas Ordowski, Nov 25 2014
From Jaroslav Krizek, Mar 06 2016: (Start)
Also primes p such that sigma(p-1) = 2p - 3.
Also primes of the form 2^n + 3*(-1)^n - 2 for n >= 0 because for odd n, 2^n - 5 is divisible by 3.
Also primes of the form 2^n + 6*(-1)^n - 5 for n >= 0 because for odd n, 2^n - 11 is divisible by 3.
Also primes of the form 2^n + 15*(-1)^n - 14 for n >= 0 because for odd n, 2^n - 29 is divisible by 3. (End)
Exactly the set of primes p such that any number congruent to a primitive root (mod p) must have at least one prime divisor that is also congruent to a primitive root (mod p). See the links for a proof. - Rafay A. Ashary, Oct 13 2016
Conjecture: these are the only solutions to the equation A000010(x)+A000010(x-1)=floor((3x-2)/2). - Benoit Cloitre, Mar 02 2018
For n > 1, if 2^n + 1 divides 3^(2^(n-1)) + 1, then 2^n + 1 is a prime. - Jinyuan Wang, Oct 13 2018
The prime numbers occurring in A003401. Also, the prime numbers dividing at least one term of A003401. - Jeppe Stig Nielsen, Jul 24 2019

Crossrefs

A019434 is the main entry for these numbers.

Programs

  • GAP
    Filtered(List([1..20],n->2^n+1),IsPrime); # Muniru A Asiru, Oct 25 2018
  • Magma
    [2^n + 1 : n in [0..25] | IsPrime(2^n+1)]; // Vincenzo Librandi, Oct 14 2018
    
  • Mathematica
    Select[2^Range[0,100]+1,PrimeQ] (* Harvey P. Dale, Aug 02 2015 *)
  • PARI
    print1(2); for(n=0,9, if(ispseudoprime(t=2^2^n+1), print1(", "t))) \\ Charles R Greathouse IV, Aug 29 2016
    

A217320 Numbers n such that (13^n - 2^n)/11 is prime.

Original entry on oeis.org

3, 5, 31, 73, 89, 521, 3943, 8719
Offset: 1

Views

Author

Robert Price, Mar 18 2013

Keywords

Comments

All terms are primes.
a(9) > 10^5.

Crossrefs

Programs

  • Mathematica
    Select[ Prime[ Range[1, 100000] ], PrimeQ[ (13^# - 2^#)/11 ]& ]
  • PARI
    is(n)=ispseudoprime((13^n-2^n)/11) \\ Charles R Greathouse IV, Jun 06 2017

A005265 a(1)=3, b(n) = Product_{k=1..n} a(k), a(n+1) is the smallest prime factor of b(n)-1.

Original entry on oeis.org

3, 2, 5, 29, 11, 7, 13, 37, 32222189, 131, 136013303998782209, 31, 197, 19, 157, 17, 8609, 1831129, 35977, 508326079288931, 487, 10253, 1390043, 18122659735201507243, 25319167, 9512386441, 85577, 1031, 3650460767, 107, 41, 811, 15787, 89, 68168743, 4583, 239, 1283, 443, 902404933, 64775657, 2753, 23, 149287, 149749, 7895159, 79, 43, 1409, 184274081, 47, 569, 63843643
Offset: 1

Views

Author

Keywords

Comments

Suggested by Euclid's proof that there are infinitely many primes.

References

  • R. K. Guy and R. Nowakowski, Discovering primes with Euclid, Delta (Waukesha), Vol. 5, pp. 49-63, 1975.
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • S. S. Wagstaff, Jr., Computing Euclid's primes, Bull. Institute Combin. Applications, 8 (1993), 23-32.

Crossrefs

Essentially the same as A084598.

Programs

  • Maple
    a :=n-> if n = 1 then 3 else numtheory:-divisors(mul(a(i),i = 1 .. n-1)-1)[2] fi:seq(a(n), n=1..15);
    # Robert FERREOL, Sep 25 2019
  • PARI
    lpf(n)=factor(n)[1,1] \\ better code exists, usually best to code in C and import
    print1(A=3); for(n=2,99, a=lpf(A); print1(", "a); A*=a) \\ Charles R Greathouse IV, Apr 07 2020

A051783 Numbers k such that 3^k + 2 is prime.

Original entry on oeis.org

0, 1, 2, 3, 4, 8, 10, 14, 15, 24, 26, 36, 63, 98, 110, 123, 126, 139, 235, 243, 315, 363, 386, 391, 494, 1131, 1220, 1503, 1858, 4346, 6958, 7203, 10988, 22316, 33508, 43791, 45535, 61840, 95504, 101404, 106143, 107450, 136244, 178428, 361608, 504206, 1753088
Offset: 1

Views

Author

Jud McCranie, Dec 09 1999

Keywords

Comments

From Farideh Firoozbakht and M. F. Hasler, Dec 06 2009: (Start)
If Q is a perfect number such that gcd(Q, 3(3^a(n) + 2)) = 1, then x = 3^(a(n) - 1)*(3^a(n) + 2)*Q is a solution of the equation sigma(x) = 3(x - Q). This is a result of the following theorem:
Theorem: If Q is a (q-1)-perfect number for some prime q, then for all integers t, the equation sigma(x) = q*x - (2t+1)*Q has the solution x = q^(k-1)*p*Q whenever k is a positive integer such that p = q^k + 2t is prime, gcd(q^(k-1), p) = 1 and gcd(q^(k-1)*p,Q) = 1.
Note that by taking t = -1/2(m*q+1), this theorem gives us some solutions of the equation sigma(x) = q *(x + m*Q). See comment lines of the sequence A058959. (End)
No further terms < 200000. - Ray Chandler, Jul 31 2011
A090649 implies that 361608 is a member of this sequence. - Robert Price, Aug 18 2014
No further terms < 320000. - Luke W. Richards, Mar 04 2018
a(45) and a(46) are probable primes because a primality certificate has not yet been found. They have been verified PRP with mprime. - Luke W. Richards, May 04 2018
No further terms < 1300000. - Luke W. Richards, May 17 2018
No further terms < 1400000. - Luke W. Richards, Jul 28 2020
Conjecture: The number n = 3^k + 2 is prime if and only if 2^((n-1)/2) == -1 (mod n). - Maheswara Rao Valluri, Jun 01 2020. [Note that this is an if and only if assertion, so it does not follow from Fermat's Little Theorem. - N. J. A. Sloane, Sep 07 2020]

Examples

			3^8 + 2 = 6563 is prime, so 8 is in the sequence.
3^26 + 2 = 2541865828331, a prime number, so 26 is in the sequence.
		

Crossrefs

Programs

Extensions

{4346, 6958, 7203} from David J. Rusin, Sep 29 2000
10988 from Ray Chandler, Nov 21 2004
{22316, 33508} found by Henri Lifchitz, Sep-Oct 2002
{43791, 45535, 61840} found by Henri Lifchitz, Oct-Nov 2004
95504 found by Wojciech Florek Dec 15 2005. - Alexander Adamchuk, Mar 02 2008
Edited by N. J. A. Sloane, Dec 19 2009
{101404, 106143, 107450, 136244} from Mike Oakes, Nov 2009
178428 from Ray Chandler, Jul 29 2011
a(45)-a(46) from Luke W. Richards, May 04 2018
a(47) from Paul Bourdelais, Mar 29 2022

A204940 Numbers n such that (23^n - 1)/22 is prime.

Original entry on oeis.org

5, 3181, 61441, 91943, 121949, 221411
Offset: 1

Views

Author

Robert Price, Jan 20 2012

Keywords

Comments

No other terms < 100000.

Crossrefs

Programs

  • Mathematica
    Select[Prime[Range[100]], PrimeQ[(23^#-1)/22]&]
  • PARI
    is(n)=ispseudoprime((23^n-1)/22) \\ Charles R Greathouse IV, Jun 13 2017

Extensions

a(5)=121949 corresponds to a probable prime discovered by Paul Bourdelais, Oct 19 2017
a(6)=221411 corresponds to a probable prime discovered by Paul Bourdelais, Aug 04 2020

A001606 Indices of prime Lucas numbers.

Original entry on oeis.org

0, 2, 4, 5, 7, 8, 11, 13, 16, 17, 19, 31, 37, 41, 47, 53, 61, 71, 79, 113, 313, 353, 503, 613, 617, 863, 1097, 1361, 4787, 4793, 5851, 7741, 8467, 10691, 12251, 13963, 14449, 19469, 35449, 36779, 44507, 51169, 56003, 81671, 89849, 94823, 140057, 148091, 159521, 183089, 193201, 202667, 344293, 387433, 443609, 532277, 574219, 616787, 631181, 637751, 651821, 692147, 901657, 1051849
Offset: 1

Views

Author

Keywords

Comments

Some of the larger entries may only correspond to probable primes.
Since (as noted under A000032) L(n) divides L(mn) whenever m is odd, L(n) cannot be prime unless n is itself prime, or else n contains no odd divisor, i.e., is a power of 2. Potential divisors of L(n) must satisfy certain linear forms dependent upon the parity of n, as shown in Vajda (1989), p. 82 (with a slight typographical error in the proof). - John Blythe Dobson, Oct 22 2007
Powers of 2 in this sequence are 2, 4, 8, 16; for 5 <= m <= 24, L(2^m) is composite; no factors of L(2^m) are known for m = 25, 26, 27, 29, 32, 33... (See Link section). - Serge Batalov, May 30 2017
2316773 is in the sequence, but its position is not yet defined. L(2316773) is a 484177-digit PRP. - Serge Batalov, Jun 11 2017

References

  • Paulo Ribenboim, The Little Book of Bigger Primes, Springer-Verlag NY 2004. See p. 246.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • S. Vajda, Fibonacci and Lucas numbers and the Golden Section: Theory and Applications. Chichester: Ellis Horwood Ltd., 1989.

Crossrefs

Cf. A080327 (n for which Lucas(n) and Fibonacci(n) are both prime).
Subsequence of A076697 (indices for which gpf(A000032(n)) sets a new record).

Programs

  • Mathematica
    Reap[For[k = 0, k < 20000, k++, If[PrimeQ[LucasL[k]], Print[k]; Sow[k]]] ][[2, 1]] (* Jean-François Alcover, Feb 27 2016 *)
  • PARI
    is(n)=ispseudoprime(fibonacci(n-1)+fibonacci(n+1)) \\ Charles R Greathouse IV, Apr 24 2015

Extensions

4 more terms from David Broadhurst, Jun 08 2001
More terms from T. D. Noe, Feb 15 2003 and Mar 04 2003; see link to The Prime Glossary.
387433, 443609, 532277 and 574219 found by Renaud Lifchitz, contributed by Eric W. Weisstein, Nov 29 2005
616787, 631181, 637751, 651821, 692147 found by Henri Lifchitz, circa Oct 01 2008, contributed by Alexander Adamchuk, Nov 28 2008
901657 and 1051849 found by Renaud Lifchitz, circa Nov 2008 and Mar 2009, contributed by Alexander Adamchuk, May 15 2010
1 more term from Serge Batalov, Jun 11 2017

A002827 Unitary perfect numbers: numbers k such that usigma(k) - k = k.

Original entry on oeis.org

6, 60, 90, 87360, 146361946186458562560000
Offset: 1

Views

Author

Keywords

Comments

d is a unitary divisor of k if gcd(d,k/d)=1; usigma(k) is their sum (A034448).
The prime factors of a unitary perfect number (A002827) are the Higgs primes (A057447). - Paul Muljadi, Oct 10 2005
It is not known if a(6) exists. - N. J. A. Sloane, Jul 27 2015
Frei proved that if there is a unitary perfect number that is not divisible by 3, then it is divisible by 2^m with m >= 144, it has at least 144 distinct odd prime factors, and it is larger than 10^440. - Amiram Eldar, Mar 05 2019
Conjecture: Subsequence of A083207 (Zumkeller numbers). Verified for all present terms. - Ivan N. Ianakiev, Jan 20 2020

Examples

			Unitary divisors of 60 are 1,4,3,5,12,20,15,60, with sum 120 = 2*60.
146361946186458562560000 = 2^18 * 3 * 5^4 * 7 * 11 * 13 * 19 * 37 * 79 * 109 * 157 * 313.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, Sect. B3.
  • F. Le Lionnais, Les Nombres Remarquables. Paris: Hermann, p. 59, 1983.
  • D. S. Mitrinovic et al., Handbook of Number Theory, Kluwer, Section III.45.1.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • James J. Tattersall, Elementary Number Theory in Nine Chapters, Cambridge University Press, 1999, pages 147-148.

Crossrefs

Subsequence of the following sequences: A003062, A290466 (seemingly), A293188, A327157, A327158.
Gives the positions of ones in A327159.

Programs

  • Mathematica
    usnQ[n_]:=Total[Select[Divisors[n],GCD[#,n/#]==1&]]==2n; Select[Range[ 90000],usnQ] (* This will generate the first four terms of the sequence; it would take a very long time to attempt to generate the fifth term. *) (* Harvey P. Dale, Nov 14 2012 *)
  • PARI
    is(n)=sumdivmult(n, d, if(gcd(d, n/d)==1, d))==2*n \\ Charles R Greathouse IV, Aug 01 2016

Formula

If m is a term and omega(m) = A001221(m) = k, then m < 2^(2^k) (Goto, 2007). - Amiram Eldar, Jun 06 2020

A002863 Number of prime knots with n crossings.

Original entry on oeis.org

0, 0, 1, 1, 2, 3, 7, 21, 49, 165, 552, 2176, 9988, 46972, 253293, 1388705, 8053393, 48266466, 294130458
Offset: 1

Views

Author

Keywords

Comments

Prime knot: a nontrivial knot which cannot (as a composite knot can) be written as the knot sum of two nontrivial knots. - Jonathan Vos Post, Apr 30 2011

References

  • For convenience, many references and links related to the enumeration of knots are collected here, even if they do not explicitly refer to this sequence.
  • C. C. Adams, The Knot Book, Freeman, NY, 2001; see p. 33.
  • C. Cerf, Atlas of oriented knots and links, Topology Atlas 3 no. 2 (1998).
  • Peter R. Cromwell, Knots and Links, Cambridge University Press, 2004, pp. 209-211.
  • Martin Gardner, The Last Recreations, Copernicus, 1997, 67-84.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • P. G. Tait, Scientific Papers, Cambridge Univ. Press, Vol. 1, 1898, Vol. 2, 1900, see Vol. 1, p. 345.
  • M. B. Thistlethwaite, personal communication.

Crossrefs

Formula

a(n) = A051766(n) + A051769(n) + A051767(n) + A051768(n) + A052400(n). - Andrew Howroyd, Oct 15 2020

Extensions

This is stated incorrectly in CRC Standard Mathematical Tables and Formulae, 30th ed., first printing, 1996, p. 320.
Terms from Hoste et al. added by Eric W. Weisstein
Consolidated references and links on enumeration of knots into this entry, also created entry for knots in Index to OEIS. - N. J. A. Sloane, Aug 25 2015
a(17)-a(19) computed by Benjamin Burton, added by Alex Klotz, Jun 21 2021
a(17)-a(19) computed by Benjamin Burton corrected by Andrey Zabolotskiy, Nov 25 2021

A062587 Numbers k such that 21^k - 20^k is prime.

Original entry on oeis.org

2, 19, 41, 43, 337, 479, 9127, 37549, 44017, 59971, 128327, 176191, 193601
Offset: 1

Views

Author

Mike Oakes, May 18 2001, May 19 2001

Keywords

Comments

Terms greater than 1000 may correspond to (unproven) strong pseudoprimes.

Crossrefs

Programs

Extensions

a(8) from Jean-Louis Charton, Feb 29 2012
a(9) and a(10) from Robert Price, May 30 2012
Edited by M. F. Hasler, Sep 16 2013
a(11) added by Jean-Louis Charton, Nov 24 2014
a(12) added by Jean-Louis Charton, Feb 05 2015
a(13) added by Jean-Louis Charton, Feb 18 2015

A119714 a(n) is the least k such that the remainder when 8^k is divided by k is n.

Original entry on oeis.org

7, 3, 5, 6, 39, 58, 7342733, 9, 36196439, 18, 501, 26, 13607, 249, 119, 20, 33, 25, 866401, 22, 533, 35, 185, 50, 196673, 27, 1843, 36, 69, 34, 551, 55, 3773365, 110, 159, 116, 355, 237, 8401, 52, 471, 81815, 85, 261, 11783479, 3258, 93, 92, 1885511821439
Offset: 1

Views

Author

Ryan Propper, Jun 12 2006

Keywords

Comments

a(61) = 1802190094793 = 11 * 59 * 17839 * 155663. - Hagen von Eitzen, Jul 28 2009

Crossrefs

Programs

  • Mathematica
    Do[k = 1; While[PowerMod[8, k, k] != n, k++ ]; Print[k], {n, 48}]
    t = Table[0, {10000}]; k = 1; lst = {}; While[k < 4300000000, a = PowerMod[8, k, k]; If[ a<10001 && t[[a]]==0, t[[a]]=k; Print[{a,k}]]; k++ ]; t (* Mathematica coding extended to reflect the new search limits as posted in the a-file by Robert G. Wilson v, Jul 17 2009 *)

Extensions

a(49) from Hagen von Eitzen, Jul 24 2009
Previous Showing 61-70 of 9098 results. Next