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 A108588 #21 Oct 23 2023 04:50:31 %S A108588 0,1,3,4,6,7,10,13,16,18,21,22,24,25,27,30,36,37,39,45,46,48,49,51,52, %T A108588 55,58,63,66,69,70,73,76,78,79,81,84,85,87,88,90,99,100,102,109,112, %U A108588 114,118,120,121,123,127,133,135,139,147,150 %N A108588 Numbers k such that 10*k + 97 is prime. %H A108588 Harvey P. Dale, <a href="/A108588/b108588.txt">Table of n, a(n) for n = 1..1000</a> %e A108588 k = 0 is a term because 10*0 + 97 = 97 (prime). %e A108588 k = 27 is a term because 10*27 + 97 = 367 (prime). %t A108588 For[n = 0, n < 150, n++, If[PrimeQ[10*n + 97], Print[n]]] (* _Stefan Steinerberger_, Feb 12 2006 *) %t A108588 Select[Range[0,200],PrimeQ[10#+97]&] (* _Harvey P. Dale_, Oct 23 2019 *) %o A108588 (PARI) is(n)=isprime(10*n+97) \\ _Charles R Greathouse IV_, Jun 13 2017 %o A108588 (Magma) [n: n in [0..400] | IsPrime(10*n+97)]; // _G. C. Greubel_, Oct 22 2023 %o A108588 (SageMath) [n for n in (0..400) if is_prime(10*n+97)] # _G. C. Greubel_, Oct 22 2023 %Y A108588 Cf. A108584, A108594, A108595. %K A108588 nonn,easy %O A108588 1,3 %A A108588 _Parthasarathy Nambi_, Jul 05 2005 %E A108588 More terms from _Stefan Steinerberger_, Feb 12 2006