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 A188131 #14 Nov 14 2019 04:44:58 %S A188131 5,13,17,37,61,73,101,137,173,181,233,241,257,277,293,313,373,397,461, %T A188131 557,577,593,601,641,653,661,761,773,797,853,937,941,1013,1033,1061, %U A188131 1117,1193,1201,1321,1361,1381,1433,1453,1481,1553,1613,1693,1733,1777,1873,1973,1993 %N A188131 Primes p == 1 (mod 4) such that 6p+1 is prime. %C A188131 Contains A188130 as a subsequence. %H A188131 Amiram Eldar, <a href="/A188131/b188131.txt">Table of n, a(n) for n = 1..10000</a> %t A188131 Select[Range[1, 2000, 4], PrimeQ[#] && PrimeQ[6# + 1] &] (* _Amiram Eldar_, Nov 13 2019 *) %o A188131 (PARI) forprime(p=1,1e5, p%4==1 & isprime(p*6+1) & print1(p", ")) %Y A188131 Cf. A188130. %K A188131 nonn %O A188131 1,1 %A A188131 _M. F. Hasler_, Mar 21 2011