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-10 of 26 results. Next

A097209 Primes of the form (10^p + 1)/11 (corresponding p are in A001562).

Original entry on oeis.org

9091, 909091, 909090909090909091, 909090909090909090909090909091, 9090909090909090909090909090909090909090909090909091, 909090909090909090909090909090909090909090909090909090909090909091
Offset: 1

Views

Author

Rick L. Shepherd, Jul 30 2004

Keywords

Comments

Equivalently, primes of the form 9090...9091 (A054416(n)-1 copies of 90 followed by 91), the subsequence of all primes in A095372.
These primes appear in A187614 because the decimal representation of their reciprocal contains only the digits 0, 1, 8, and 9.

Crossrefs

A004023 Indices of prime repunits: numbers k such that 11...111 (with k 1's) = (10^k - 1)/9 is prime.

Original entry on oeis.org

2, 19, 23, 317, 1031, 49081, 86453, 109297, 270343, 5794777, 8177207
Offset: 1

Views

Author

Keywords

Comments

People who search for repunit primes or repdigit primes may be looking for this entry.
The indices of primes with digital product (i.e., product of digits) equal to 1.
As of August 2014, only the first five repunits, through (10^1031-1)/9, have been proved prime. The next four repunits are known only to be probable primes and have not been proved to be prime. - Robert Baillie, Aug 17 2014
These indices p must also be prime. If p is not prime, say p = m*n, then 10^(m*n) - 1 = ((10^m)^n) - 1 => 10^m - 1 divides 10^(m*n) - 1. Since 9 divides 10^m - 1 or (10^m - 1)/9 = q, it follows q divides (10^p - 1)/9. This is a result of the identity, a^n - b^n = (a - b)(a^(n-1) + a^(n-2)*b + ... + b^(n-1)). - Cino Hilliard, Dec 23 2008
The numbers R_n = 11...111 = (10^n - 1)/9 with n in this sequence A004023, except for n = 2, are prime repunits in base ten, so they are prime Brazilian numbers belonging to A085104. [See Links: Les nombres brésiliens.] - Bernard Schott, Dec 24 2012
Search limit is 10800000, currently. - Serge Batalov, Jul 01 2021
On March 22 2022 the probable prime R49081 was proved to be a prime, and on May 15 2023 the probable prime R86453 was proved to be a prime. - Bassam Abdul-Baki, Dec 17 2024

Examples

			2 appears because the 2-digit repunit 11 is prime.
3 does not appear because 111 = 3 * 37 is not prime.
19 appears because the 19-digit repunit 1111111111111111111 is prime.
		

References

  • J. Brillhart et al., Factorizations of b^n +- 1. Contemporary Mathematics, Vol. 22, Amer. Math. Soc., Providence, RI, 2nd edition, 1985; and later supplements.
  • J.-M. De Koninck, Ces nombres qui nous fascinent, Entry 19, pp 6, Ellipses, Paris 2008.
  • R. K. Guy, Unsolved Problems in Number Theory, Section A3.
  • Graham, Knuth and Patashnik, Concrete Mathematics, Addison-Wesley, 1994; see p 146 problem 22.
  • Clifford A. Pickover, A Passion for Mathematics, Wiley, 2005; see p. 60.
  • Paulo Ribenboim, The Little Book of Bigger Primes, Springer-Verlag NY 2004. See p. 235.
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • David Wells, The Penguin Dictionary of Curious and Interesting Numbers. Penguin Books, NY, 1986, Revised edition 1987. See entry 142857 at pp. 197-198.

Crossrefs

See A004022 for the actual primes.

Programs

  • Magma
    [p: p in PrimesUpTo(500) | IsPrime((10^p - 1) div 9)]; // Vincenzo Librandi, Nov 06 2014
    
  • Mathematica
    Select[Range[271000], PrimeQ[FromDigits[PadRight[{}, #, 1]]] &] (* Harvey P. Dale, Nov 05 2011 *)
    repUnsUpTo[k_] := ParallelMap[If[PrimeQ[#] && PrimeQ[(10^# - 1)/9], #, Nothing] &, Range[k]]; repUnsUpTo[5000] (* Mikk Heidemaa, Apr 24 2017 *)
  • PARI
    forprime(x=2,20000,if(ispseudoprime((10^x-1)/9),print1(x","))) \\ Cino Hilliard, Dec 23 2008
    
  • Python
    from sympy import isprime; {print(n, end = ', ') for n in range(1, 10**7) if isprime(n) and isprime(10**n//9)} # (Note that sympy.isprime is only a pseudo-primality test.) - Ya-Ping Lu, Dec 20 2021, edited by M. F. Hasler, Mar 28 2022

Extensions

a(6) = 49081 PRP found by Harvey Dubner - posting to Number Theory List (NMBRTHRY(AT)LISTSERV.NODAK.EDU) Sep 09, 1999; proved prime by Paul Underwood, Mar 21 2022.
a(7) = 86453 found using pfgw (a faster version of PrimeForm) on Oct 26 2000 by Lew Baxter (posting to Number Theory List), Oct 26, 2000; proved prime by Andreas Enge, May 16 2023.
a(8) = 109297 was apparently discovered independently by (in alphabetical order) Paul Bourdelais and Harvey Dubner around Mar 26-28 2007.
a(9) = 270343, was found Jul 11 2007 by Maksym Voznyy and Anton Budnyy, subsequently confirmed as a(9) (see Repunit Primes Project link) by Robert Price, Dec 14 2010
a(10) = 5794777 was found Apr 20 2021 by Ryan Propper and Serge Batalov
a(11) = 8177207 was found May 08 2021 by Ryan Propper and Serge Batalov

A057934 Number of prime factors of 10^n + 1 (counted with multiplicity).

Original entry on oeis.org

1, 1, 3, 2, 2, 2, 2, 2, 5, 3, 5, 3, 3, 4, 7, 5, 4, 3, 2, 4, 8, 4, 5, 3, 5, 3, 7, 4, 3, 7, 2, 4, 9, 4, 5, 6, 4, 3, 10, 4, 3, 7, 4, 4, 12, 4, 4, 9, 4, 7, 8, 4, 2, 6, 10, 5, 6, 5, 4, 6, 3, 3, 12, 3, 6, 8, 2, 4, 10, 11, 3, 5, 4, 7, 11, 6, 12, 7, 4, 9, 11, 3, 7, 8, 8, 3, 8, 4, 4, 11, 6, 4, 8, 4, 6, 8, 4, 5, 13
Offset: 1

Views

Author

Patrick De Geest, Oct 15 2000

Keywords

Comments

2^(a(2n)-1)-1 predicts the number of pair-solutions of even length L for AB = A^2 + B^2. For instance, with length 18 we have 10^18 + 1 = 101*9901*999999000001 or 3 divisors F which when put into the Mersenne formula 2^(F-1)-1 yields 3 pairs (see reference 'Puzzle 104' for details).

Crossrefs

bigomega(b^n+1): this sequence (b=10), A057935 (b=9), A057936 (b=8), A057937 (b=7), A057938 (b=6), A057939 (b=5), A057940 (b=4), A057941 (b=3), A054992 (b=2).

Programs

Formula

a(n) = A057951(2n) - A057951(n). - T. D. Noe, Jun 19 2003

A095372 1+integers repeating "90" decimal digit pattern.

Original entry on oeis.org

1, 91, 9091, 909091, 90909091, 9090909091, 909090909091, 90909090909091, 9090909090909091, 909090909090909091, 90909090909090909091, 9090909090909090909091, 909090909090909090909091
Offset: 0

Views

Author

Labos Elemer, Jun 07 2004

Keywords

Comments

These numbers arise for example as divisors of several repunits (A002275).
The aerated sequence A(n) = [1, 0, 91, 0, 9091, 0, 909091,...] is a divisibility sequence, i.e., A(n) divides A(m) whenever n divides m. It is the case P1 = 0, P2 = -11^2, Q = 10 of the 3-parameter family of 4th-order linear divisibility sequences found by Williams and Guy. - Peter Bala, Aug 22 2019
Except for a(0) = 1, these terms M are such that 21 * M = 1M1, where 1M1 denotes the concatenation of 1, M and 1. Actually 21 is A329914(1) and a(1) = A329915(1) = 91, and the terms >=91 form the set {M_21}; for example, 21 * 909091 = 1(909091)1. - Bernard Schott, Dec 01 2019

Examples

			Digit-pattern P=[ab..z] repeating integers equal formally with P*(-1+10^(Ln))/(-1+10^L), where L is the length of pattern;
a(9) divides A002275(38) repunit. See A095371.
		

Crossrefs

Programs

  • Mathematica
    Table[1+90*(100^n-1)/99, {n, 0, 20}]

Formula

a(n) = 1 + 90*(-1 + 100^n)/99 = (10^(2*n+1) + 1)/11. - Rick L. Shepherd, Aug 01 2004
From Colin Barker, Jul 03 2013: (Start)
a(n) = 101*a(n-1) - 100*a(n-2).
G.f.: -(10*x-1)/((x-1)*(100*x-1)). (End)
E.g.f.: exp(x)*(1 + 10*(exp(99*x) - 1)/11). - Elmo R. Oliveira, Mar 15 2025

A126856 Numbers n such that (31^n + 1)/32 is prime.

Original entry on oeis.org

109, 461, 1061, 50777
Offset: 1

Views

Author

Alexander Adamchuk, Mar 23 2007

Keywords

Comments

All terms are primes.
a(5) > 10^5. - Robert Price, Jul 12 2013

Crossrefs

Programs

  • Mathematica
    Do[ p=Prime[n]; If[ PrimeQ[ (31^p + 1)/32 ], Print[p] ], {n,1,1100} ]
  • PARI
    is(n)=isprime((31^n+1)/32) \\ Charles R Greathouse IV, Feb 17 2017

Extensions

a(4) from Robert Price, Jul 12 2013

A229145 Numbers k such that (36^k + 1)/37 is prime.

Original entry on oeis.org

31, 191, 257, 367, 3061, 110503, 1145393
Offset: 1

Views

Author

Robert Price, Sep 15 2013

Keywords

Comments

All such numbers k are prime.
Note that a(6) = 110503 corresponds to (36^110503 + 1)/37, which is only a probable prime with 171975 digits.
The primes corresponding to the terms of this sequence have 1 as their last digit and an even number as their next-to-last digit. - Iain Fox, Dec 08 2017

Crossrefs

Programs

  • Mathematica
    Do[ p=Prime[n]; If[ PrimeQ[ (36^p + 1)/37 ], Print[p] ], {n, 1, 9592} ]
  • PARI
    is(n)=isprime((36^n+1)/37) \\ Charles R Greathouse IV, Feb 17 2017

Extensions

a(6) = 110503 (posted by Lelio R. Paula on primenumbers.net) from Paul Bourdelais, Dec 08 2017
a(7) from Paul Bourdelais, Nov 03 2023

A185240 Numbers k such that (35^k + 1)/36 is prime.

Original entry on oeis.org

11, 13, 79, 127, 503, 617, 709, 857, 1499, 3823, 135623, 280979
Offset: 1

Views

Author

Robert Price, Aug 29 2013

Keywords

Comments

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

Crossrefs

Programs

  • Mathematica
    Do[ p=Prime[n]; If[ PrimeQ[ (35^p + 1)/36 ], Print[p] ], {n, 1, 9592} ]
  • PARI
    is(n)=isprime((35^n+1)/36) \\ Charles R Greathouse IV, Feb 17 2017

Extensions

a(11)=135623 found as probable prime and added by Paul Bourdelais, Jul 05 2018
a(12) from Paul Bourdelais, Sep 13 2021

A229524 Numbers k such that (38^k + 1)/39 is prime.

Original entry on oeis.org

5, 167, 1063, 1597, 2749, 3373, 13691, 83891, 131591
Offset: 1

Views

Author

Robert Price, Sep 25 2013

Keywords

Comments

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

Crossrefs

Programs

  • Mathematica
    Do[ p=Prime[n]; If[ PrimeQ[ (38^p + 1)/39 ], Print[p] ], {n, 1, 9592} ]
  • PARI
    is(n)=ispseudoprime((38^n+1)/39) \\ Charles R Greathouse IV, Feb 17 2017

Extensions

a(9)=131591 corresponds to a probable prime discovered by Paul Bourdelais, Jul 03 2018

A229663 Numbers n such that (40^n + 1)/41 is prime.

Original entry on oeis.org

53, 67, 1217, 5867, 6143, 11681, 29959
Offset: 1

Views

Author

Robert Price, Sep 27 2013

Keywords

Comments

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

Crossrefs

Programs

  • Mathematica
    Do[ p=Prime[n]; If[ PrimeQ[ (40^p + 1)/41 ], Print[p] ], {n, 1, 9592} ]
  • PARI
    is(n)=ispseudoprime((40^n+1)/41) \\ Charles R Greathouse IV, Feb 17 2017

A230036 Numbers n such that (39^n + 1)/40 is prime.

Original entry on oeis.org

3, 13, 149, 15377
Offset: 1

Views

Author

Robert Price, Oct 05 2013

Keywords

Comments

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

Crossrefs

Programs

  • Mathematica
    Do[ p=Prime[n]; If[ PrimeQ[ (39^p + 1)/40 ], Print[p] ], {n, 1, 9592} ]
  • PARI
    is(n)=ispseudoprime((39^n+1)/40) \\ Charles R Greathouse IV, Feb 17 2017
Showing 1-10 of 26 results. Next