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 A094179 #15 Jan 22 2022 08:48:37
%S A094179 3,7,11,19,23,27,31,43,47,59,63,67,71,79,83,99,103,107,127,131,139,
%T A094179 147,151,163,167,171,179,191,199,207,211,223,227,231,239,243,251,263,
%U A094179 271,279,283,307,311,331,343,347,359,363,367,379,383,387,399,419,423,431
%N A094179 Numbers congruent to 3 mod 4 which are divisible only by primes congruent to 3 mod 4.
%H A094179 Harvey P. Dale, <a href="/A094179/b094179.txt">Table of n, a(n) for n = 1..1000</a>
%t A094179 Select[Range[3,431,4],Union[Mod[Transpose[FactorInteger[#]][[1]],4]] == {3}&] (* _Harvey P. Dale_, Apr 28 2012 *)
%o A094179 (PARI) {forstep(n=3,440,4,fac=factor(n);if(vecmin(vector(matsize(fac)[1],j,fac[j,1])%4)==3,print1(n,",")))} \\ _Klaus Brockhaus_, May 08 2004
%o A094179 (PARI) is(n)=if(n%4<3, return(0)); Set(factor(n)[,1]%4)==[3] \\ _Charles R Greathouse IV_, Jan 20 2022
%Y A094179 Intersection of A004614 and A004767; intersection of A004614 and A026424.
%Y A094179 Cf. A094180.
%K A094179 nonn
%O A094179 1,1
%A A094179 _Lekraj Beedassy_, May 06 2004
%E A094179 More terms from _Klaus Brockhaus_, May 08 2004