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-3 of 3 results.

A097683 Numbers k such that R_k + 2 is prime, where R_k = 11...1 is the repunit (A002275) of length k.

Original entry on oeis.org

0, 1, 2, 3, 5, 9, 11, 24, 84, 221, 1314, 2952, 20016, 51054
Offset: 1

Views

Author

Carl R. White and Julien Peter Benney (jpbenney(AT)ftml.net), Aug 19 2004

Keywords

Comments

Also numbers k such that (10^k + 17)/9 is prime.
The corresponding values R_k + 2 are primes of the form "(n-1) ones followed by a three"; zero is a degenerate case. Related to the base-10 repunit primes.
a(15) > 10^5. - Robert Price, Oct 12 2014
By Kamada link, a(15) > 4*10^5. - Jeppe Stig Nielsen, Jan 17 2023

Examples

			11113 = ((10^5)+17)/9 and 11113 is prime.
		

Crossrefs

Programs

  • Maple
    A097683:=n->`if`((10^n+17 mod 9) = 0 and isprime(floor((10^n+17)/9)),n,NULL): seq(A097683(n), n=0..10^3); # Wesley Ivan Hurt, Oct 12 2014
  • Mathematica
    Do[ If[ PrimeQ[(10^n - 1)/9 + 2], Print[n]], {n, 0, 5951}] (* Robert G. Wilson v, Oct 15 2004 *)

Formula

a(n) = A056654(n-1) + 1.

Extensions

a(11)-a(12) from Robert G. Wilson v, Oct 15 2004
Edited by N. J. A. Sloane, Apr 02 2009, at the suggestion of Farideh Firoozbakht
a(13) from Kamada link by Ray Chandler, Dec 23 2010
a(14) from Robert Price, Oct 12 2014

A097685 Numbers k such that R_k + 8 is prime, where R_k = 11...1 is the repunit (A002275) of length k.

Original entry on oeis.org

2, 5, 6, 8, 17, 50, 684, 720, 1452, 1679, 3146, 72821, 111902, 146063, 180689, 330906
Offset: 1

Views

Author

Carl R. White, Aug 19 2004

Keywords

Comments

Also numbers k such that (10^k + 71)/9 is prime.
The corresponding values R_k + 8 are primes of the form "(k-1) ones followed by a nine". Related to the base-10 repunit primes.
a(13) > 10^5. - Robert Price, Nov 01 2014

Crossrefs

Programs

  • Mathematica
    Do[ If[ PrimeQ[(10^n - 1)/9 + 8], Print[n]], {n, 0, 5000}] (* Robert G. Wilson v, Oct 14 2004 *)

Formula

a(n) = A056659(n) + 1.

Extensions

a(12) from Robert Price, Nov 01 2014
a(13)-a(16) from Kamada data by Tyler Busby, May 03 2024

A056655 Numbers k such that 10*R_k + 7 is prime, where R_k = 11...1 is the repunit (A002275) of length k.

Original entry on oeis.org

0, 1, 3, 4, 7, 22, 28, 39, 130, 135, 214, 610, 766, 2152, 2575, 22972, 42688, 85711, 85863, 112066, 538507, 631714
Offset: 1

Views

Author

Robert G. Wilson v, Aug 09 2000

Keywords

Comments

Also numbers k such that (10^(k+1)+53)/9 is prime.
2575 also produces a probable prime.
a(20) > 10^5. - Robert Price, Jan 13 2015
a(23) > 670000 (per the Kamada link). - Bill McEachen, Mar 02 2024

Crossrefs

Cf. A093139 (corresponding primes), A097684.

Programs

  • Mathematica
    Do[ If[ PrimeQ[ 10*(10^n - 1)/9 + 7 ], Print[ n ] ], {n, 0, 1250} ]

Formula

a(n) = A097684(n) - 1 for all n >= 0. - Rick L. Shepherd, Aug 23 2004

Extensions

a(14) (giving a probable prime) from Rick L. Shepherd, Mar 23 2004
a(15) from Rick L. Shepherd, Aug 23 2004
a(16)-a(19) derived from A097684 by Robert Price, Jan 13 2015
a(20)-a(22) from the Kamada link by Bill McEachen, Mar 02 2024
Showing 1-3 of 3 results.