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 A142152 #14 Sep 08 2022 08:45:35 %S A142152 59,97,173,211,401,439,743,857,971,1009,1123,1237,1427,1579,1693,1997, %T A142152 2111,2339,2377,2719,2833,2909,3023,3061,3137,3251,3517,3593,3631, %U A142152 3821,4049,4201,4391,4657,4733,4999,5113,5189,5227,5303,5417,5531,5569,5683,5987 %N A142152 Primes congruent to 21 mod 38. %H A142152 Enrique Pérez Herrero, <a href="/A142152/b142152.txt">Table of n, a(n) for n = 1..2500</a> %F A142152 a(n) ~ 18n log n. - _Charles R Greathouse IV_, Jul 02 2016 %t A142152 isA142152[n_]:=(Mod[n,38]==21)&&(PrimeQ[n]) %t A142152 Select[Prime[Range[1000]], Mod[#,38]==21&] %t A142152 Select[Range[21,6000,38],PrimeQ] (* _Harvey P. Dale_, Nov 06 2019 *) %o A142152 (Magma)[p: p in PrimesUpTo(7000) | p mod 38 eq 21 ]; // _Vincenzo Librandi_, Aug 19 2012 %o A142152 (PARI) is(n)=isprime(n) && n%38==21 \\ _Charles R Greathouse IV_, Jul 02 2016 %Y A142152 Cf. A000040. %K A142152 nonn,easy %O A142152 1,1 %A A142152 _N. J. A. Sloane_, Jul 11 2008