OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
José Camacho Medina, Cadenas de Numeros Primos (in Spanish).
FORMULA
a(n) >> n log^8 n. - Charles R Greathouse IV, Jan 13 2017
EXAMPLE
For n = 483, the primes are {479, 467, 419, 227, 541, 3613, 15901, 65053}.
MATHEMATICA
Select[Range[11*10^5], AllTrue[Abs[#-4^Range[8]], PrimeQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 28 2020 *)
PROG
(PARI) is(n)=for(k=1, 8, if(!isprime(abs(n-4^k)), return(0))); 1 \\ Charles R Greathouse IV, Jan 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
José de Jesús Camacho Medina, Jan 13 2017
EXTENSIONS
More terms from Charles R Greathouse IV, Jan 13 2017
STATUS
approved