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 A165811 #9 Sep 08 2022 08:45:48 %S A165811 37,127,199,307,523,739,1063,1279,1423,1747,2287,2467,2503,2683,2719, %T A165811 3259,3547,3583,4339,4519,4987,5059,5527,6067,6247,6607,6823,7219, %U A165811 7759,8623,8839,9739,10243,10567,11863,12619,12763,13627,14347,14563,14779,14887 %N A165811 Primes of the form 18*p+1, where p is also a prime. %H A165811 Vincenzo Librandi, <a href="/A165811/b165811.txt">Table of n, a(n) for n = 1..1000</a> %F A165811 a(n) = 1+18*A165810(n). %e A165811 p=2 contributes 37=18*2+1. p=7 contributes 127=18*7+1. p=11 contributes 199=18*11+1 %t A165811 Select[Table[18p + 1, {p, Prime[Range[400]]}], PrimeQ] (* _Vincenzo Librandi_, Oct 13 2012 *) %o A165811 (Magma) [a: p in PrimesInInterval(2, 1000) | IsPrime(a) where a is 18*p + 1]; // _Vincenzo Librandi_, Oct 13 2012 %Y A165811 Cf. A111094, A153400, A165810. %K A165811 nonn,easy %O A165811 1,1 %A A165811 _Vincenzo Librandi_, Sep 28 2009 %E A165811 Extended by _R. J. Mathar_, Oct 16 2009