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 A158017 #18 Feb 03 2024 00:54:27
%S A158017 2,3,11,23,41,71,83,101,107,113,149,167,179,227,239,269,311,317,347,
%T A158017 353,389,479,491,521,557,569,587,647,653,683,809,821,827,839,863,911,
%U A158017 977,983,1091,1229,1259,1283,1289,1301,1367,1373,1439,1487,1493,1607,1619
%N A158017 Primes p such that 10*p-1 is also prime.
%C A158017 The family of prime sequences that generate primes k*p-1 for k = 2, 4, 6, 8, ... also comprises A005382 (k=2), A062737 (k=4), A158015 (k=6), and A158016 (k=8).
%H A158017 Vincenzo Librandi, <a href="/A158017/b158017.txt">Table of n, a(n) for n = 1..1000</a>
%t A158017 Flatten[Table[If[PrimeQ[n] && PrimeQ[10*n - 1], n, {}], {n, 1, 10000}]]
%t A158017 Select[Prime[Range[600]], PrimeQ[(10 # - 1)]&] (* _Vincenzo Librandi_, Apr 14 2013 *)
%o A158017 (Magma) [p: p in PrimesUpTo(3000)|IsPrime(10*p-1)] // _Vincenzo Librandi_, Jan 29 2011
%Y A158017 Cf. A005382, A062737.
%K A158017 nonn,easy
%O A158017 1,1
%A A158017 _Roger L. Bagula_, Mar 11 2009