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 A005122 #38 Feb 05 2024 00:54:38 %S A005122 1,3,4,6,9,10,13,16,19,21,24,25,28,30,33,34,39,45,46,48,54,55,58,60, %T A005122 61,63,75,76,79,81,90,91,93,94,103,105,108,111,114,115,121,123,124, %U A005122 129,130,133,136,138,144,153,154,160,163,165,166,171,175,178,180 %N A005122 Numbers k such that 8k - 1 is prime. %C A005122 Corresponding primes are listed in A007522. - _Altug Alkan_, Dec 10 2015 %H A005122 Harvey P. Dale, <a href="/A005122/b005122.txt">Table of n, a(n) for n = 1..1000</a> %p A005122 A005122:=n->`if`(isprime(8*n-1), n, NULL): seq(A005122(n), n=1..300); # _Wesley Ivan Hurt_, Dec 11 2015 %t A005122 Select[Range[160], PrimeQ[8#-1]&] (* _Harvey P. Dale_, Nov 25 2011 *) %o A005122 (PARI) isok(n) = isprime(8*n-1); \\ _Michel Marcus_, Dec 10 2015 %o A005122 (Magma) [n: n in [1..200] | IsPrime(8*n-1)]; // _Vincenzo Librandi_, Dec 10 2015 %Y A005122 Cf. A007522. %K A005122 nonn,easy %O A005122 1,2 %A A005122 _N. J. A. Sloane_