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 A359630 #43 Feb 09 2025 19:03:09
%S A359630 2,3,5,11,17,101,107,26927,48109
%N A359630 Primes p such that 10^p+3 or 10^p+9 is also prime.
%C A359630 Union of the terms which are prime in A049054 and in A088275.
%C A359630 If it exists, a(10) > 2*10^5 (according to the comment at A088275).
%e A359630 3 is a term since it is prime and so is 10^3 + 9 = 1009.
%e A359630 11 is a term since it is prime and 10^11 + 3 = 100000000003 is also a prime.
%t A359630 Block[{p}, ParallelDo[p := Prime @ i; If[(PrimeQ[10^p + 3] || PrimeQ[10^p + 9]), Print @ p], {i, PrimePi @ 48109}, Method -> "FinestGrained"]]
%t A359630 Select[Prime[Range[5000]],AnyTrue[10^#+{3,9},PrimeQ]&] (* _Harvey P. Dale_, Feb 09 2025 *)
%Y A359630 Cf. A049054, A088275.
%K A359630 nonn,base,hard,more
%O A359630 1,1
%A A359630 _Mikk Heidemaa_, Jan 08 2023