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 A282326 #37 Apr 15 2018 13:50:52
%S A282326 31,61,151,181,241,271,421,571,601,661,811,1021,1051,1231,1291,1321,
%T A282326 1621,1951,2131,2311,2341,2551,2731,2791,2971,3001,3121,3301,3331,
%U A282326 3361,3391,3541,3931,4021,4051,4231,4261,4651,4801,5011,5101,5281,5521,5641,5851
%N A282326 Greater of twin primes congruent to 1 (mod 30).
%C A282326 The union of [A060229 and this sequence] is A132243.
%C A282326 The union of [{5, 7}, A282322, A282324 and this sequence] is the greater of twin primes sequence A006512.
%C A282326 The union of [{3, 5, 7}, A282321 to A060229 and this sequence] is the twin primes sequence A001097.
%C A282326 Number of terms less than 10^k, k=2,3,4,...: 2, 11, 72, 407, 2697, 19507, 146516, ... - _Muniru A Asiru_, Mar 05 2018
%H A282326 Muniru A Asiru, <a href="/A282326/b282326.txt">Table of n, a(n) for n = 1..10000</a>
%p A282326 select(n -> isprime(n-2) and isprime(n), [seq(30*k+1, k=0..300)]); # _Muniru A Asiru_, Mar 05 2018
%t A282326 1 + Select[30 Range@ 200, AllTrue[# + {-1, 1}, PrimeQ] &] (* _Michael De Vlieger_, Mar 26 2018 *)
%o A282326 (PARI) list(lim)=my(v=List(),p=2); forprime(q=3,lim, if(q-p==2 && q%30==1, listput(v,q)); p=q); Vec(v) \\ _Charles R Greathouse IV_, Feb 14 2017
%o A282326 (GAP) Filtered(List([0..300], k -> 30*k+1), n -> IsPrime(n-2) and IsPrime(n)); # _Muniru A Asiru_, Mar 05 2018
%Y A282326 Subset of A006512, A181603, A132230, A132243 and A132247.
%Y A282326 Cf. A001359, A232880, A232881, A232882, A282321, A282322, A282323, A282324, A060229.
%K A282326 nonn
%O A282326 1,1
%A A282326 _Martin Renner_, Feb 11 2017