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 A309024 #54 Sep 21 2020 22:33:01
%S A309024 3167,8543,14423,18191,22343,25703,28871,35999,40127,54647,73127,
%T A309024 75407,77591,80783,82463,87071,89759,93887,105167,112103,112559,
%U A309024 124823,127679,130367,140423,143519,149519,159431,170231,175391,175727,186647,187127
%N A309024 Inert rational primes in the intersection of all Q(sqrt(-d)) where d is a Heegner number.
%C A309024 These primes stay prime in the rings of integers of all imaginary quadratic fields with unique factorization.
%C A309024 However, none of these are prime, e.g., in Q(sqrt(2)) which indicates that there are no numbers that stay prime in all quadratic fields with unique factorization. - _Marc Beutter_, Aug 25 2020
%C A309024 Primes p such that A307836(n) = -9 with p = prime(n). - _Marc Beutter_, Aug 25 2020
%H A309024 Marc Beutter, <a href="/A309024/b309024.txt">Table of n, a(n) for n = 1..10000</a>
%t A309024 Table[If[MemberQ[JacobiSymbol[{-1, -2, -3, -7, -11, -19, -43, -67, -163}, k], 1], Unevaluated[Sequence[]], k], {k, Prime@Range@PrimePi[200000]}]
%Y A309024 Cf. A003173, A307836.
%K A309024 nonn
%O A309024 1,1
%A A309024 _Marc Beutter_, Jul 08 2019