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 A281549 #23 May 26 2018 11:21:01 %S A281549 525,635,3335,22547,132725,242073,590663,598793,795143,963815,1910433, %T A281549 2506647,5833497,13032533,13336685,22163097,22291055,27730755, %U A281549 36069767,39412953,41006745,42520623,44594457,47869577,63735185,73770483,76852937,89703543,100998105 %N A281549 Numbers n such that abs(n - 4^k) is prime for k = 1..10. %H A281549 Chai Wah Wu, <a href="/A281549/b281549.txt">Table of n, a(n) for n = 1..1000</a> %e A281549 For n = 525, the primes are {521, 509, 461, 269, 499, 3571, 15859, 65011, 261619, 1048051}. %t A281549 AA = Table[PrimeQ[Abs[n - 4^k]], {n, 1, 150000}, {k, 1, 10}]; %t A281549 Flatten[Position[AA, {True, True, True, True, True, True, True, True, True, True}]] %o A281549 (PARI) is(n)=for(k=1, 10, if(!isprime(abs(n-4^k)), return(0))); 1 %Y A281549 Cf. A281047. %K A281549 nonn %O A281549 1,1 %A A281549 _José de Jesús Camacho Medina_, Jan 23 2017 %E A281549 Extended by _Charles R Greathouse IV_, Jan 24 2017 %E A281549 a(25)-a(29) from _Chai Wah Wu_, Jan 25 2017