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 A176133 #9 May 29 2025 19:27:02
%S A176133 5,17,137,313,373,397,577,593,653,773,1033,1117,1433,1613,2137,2153,
%T A176133 2293,2333,2677,3257,3413,3593,3673,4153,4217,4597,4657,5197,5693,
%U A176133 5717,6373,6673,6857,6997,7297,8377,8573,9277,9413,9433,10357,10973,11813
%N A176133 Pythagorean primes p (primes of form 4*k + 1) such that 6*p -+ 1 are twin primes.
%H A176133 Amiram Eldar, <a href="/A176133/b176133.txt">Table of n, a(n) for n = 1..10000</a>
%e A176133 5 is a term since 5 = 4*1 + 1, and 6*5 - 1 = 29 and 6*5 + 1 = 31 are twin primes.
%t A176133 lst={};Do[If[PrimeQ[p=4*n+1]&&PrimeQ[6*p-1]&&PrimeQ[6*p+1],AppendTo[lst,p]],{n,0,8!}];lst
%t A176133 Select[4*Range[3000]+1,AllTrue[{#,6#+1,6#-1},PrimeQ]&] (* _Harvey P. Dale_, May 29 2025 *)
%Y A176133 Cf. A000040, A001359, A002144, A006512, A176131, A176132.
%K A176133 nonn
%O A176133 1,1
%A A176133 _Vladimir Joseph Stephan Orlovsky_, Apr 09 2010