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.
%I A281047 #26 Jul 28 2020 19:17:57 %S A281047 483,525,635,2015,2043,3335,3575,4275,10317,14955,17855,22547,49433, %T A281047 51695,52773,79877,125807,132725,176417,242073,314177,451937,463517, %U A281047 590663,598793,707817,795143,798335,963815,994565,1095465 %N A281047 Numbers n such that abs(n - 4^k) is prime for k = 1..8. %H A281047 Charles R Greathouse IV, <a href="/A281047/b281047.txt">Table of n, a(n) for n = 1..10000</a> %H A281047 José Camacho Medina, <a href="http://matematicofresnillense.blogspot.mx/2016/08/cadenas-de-numeros-primos.html">Cadenas de Numeros Primos</a> (in Spanish). %F A281047 a(n) >> n log^8 n. - _Charles R Greathouse IV_, Jan 13 2017 %e A281047 For n = 483, the primes are {479, 467, 419, 227, 541, 3613, 15901, 65053}. %t A281047 Select[Range[11*10^5],AllTrue[Abs[#-4^Range[8]],PrimeQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 28 2020 *) %o A281047 (PARI) is(n)=for(k=1,8,if(!isprime(abs(n-4^k)), return(0))); 1 \\ _Charles R Greathouse IV_, Jan 13 2017 %K A281047 nonn %O A281047 1,1 %A A281047 _José de Jesús Camacho Medina_, Jan 13 2017 %E A281047 More terms from _Charles R Greathouse IV_, Jan 13 2017