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

A266144 Number of n-digit primes in which n-1 of the digits are 5's.

Original entry on oeis.org

4, 2, 1, 1, 0, 1, 0, 2, 0, 1, 0, 2, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
Offset: 1

Views

Author

Keywords

Comments

The leading digits must be 5's and only the trailing digit can vary.
For n large a(n) is usually zero.

Examples

			a(2) = 2 since 53 and 59 are primes.
a(3) = 1 since 557 is the only prime.
		

Crossrefs

Programs

  • Mathematica
    d = 5; Array[Length@ Select[d (10^# - 1)/9 + (Range[0, 9] - d), PrimeQ] &, 100]
  • Python
    from _future_ import division
    from sympy import isprime
    def A266144(n):
        return 4 if n==1 else sum(1 for d in [-4,-2,2,4] if isprime(5*(10**n-1)//9+d)) # Chai Wah Wu, Dec 27 2015

A056685 Numbers k such that 50*R_k + 3 is prime, where R_k = 11...1 is the repunit (A002275) of length k.

Original entry on oeis.org

0, 1, 7, 25, 65, 73, 232, 472, 539, 2773, 64714
Offset: 1

Views

Author

Robert G. Wilson v, Aug 10 2000

Keywords

Comments

Also numbers k such that (5*10^(k+1)-23)/9 is prime.
a(12) > 10^5. - Robert Price, Nov 13 2014

Crossrefs

Programs

  • Magma
    [n: n in [0..400]| IsPrime((5*10^(n+1)-23)div 9)]; // Vincenzo Librandi, Nov 14 2014
  • Mathematica
    Do[ If[ PrimeQ[50*(10^n - 1)/9 + 3], Print[n]], {n, 0, 5000}]
    Select[Range[0, 3000], PrimeQ[(5 10^(# + 1) - 23) / 9] &] (* Vincenzo Librandi, Nov 14 2014 *)

Formula

a(n) = A099416(n) - 1. - Robert Price, Nov 13 2014 [adapted by Georg Fischer, Jan 04 2021]

Extensions

a(11) derived from A099416 by Robert Price, Nov 13 2014
Showing 1-2 of 2 results.