A278470 Numbers k such that 10^k - 201 is prime.
13, 20, 40, 43, 73, 85, 576, 1676, 33565
Offset: 1
Examples
13 is in this sequence because 10^13 - 201 = 9999999999799 is prime. Initial terms and associated primes: a(1) = 13, 9999999999799; a(2) = 20, 99999999999999999799; a(3) = 40, 9999999999999999999999999999999999999799; etc.
Links
- Makoto Kamada, Factorization of near-repdigit-related numbers.
Crossrefs
Programs
-
Magma
[n: n in [3..500] | IsPrime(10^n-201)];
-
Maple
A278470:=n->`if`(isprime(10^n-201), n, NULL): seq(A278470(n), n=1..10^3); # Wesley Ivan Hurt, Dec 08 2016
-
Mathematica
Select[Range[3, 2000], PrimeQ[10^# - 201] &]
-
PARI
is(n)=ispseudoprime(10^n-201) \\ Charles R Greathouse IV, Jun 06 2017
Extensions
a(9) from Kamada data by Tyler Busby, May 03 2024
Comments