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 A024914 #36 Feb 05 2024 00:59:53 %S A024914 1,2,4,5,7,10,11,13,14,16,17,20,23,26,28,31,32,34,35,37,40,46,47,49, %T A024914 55,56,58,59,61,62,65,68,73,76,79,80,83,86,88,89,91,94,95,97,98,100, %U A024914 109,110,112,119,122,124,128,130,131,133,137,143,145,149,157,160,161,163,164,166,167 %N A024914 Numbers k such that 10*k - 3 is prime. %H A024914 Vincenzo Librandi, <a href="/A024914/b024914.txt">Table of n, a(n) for n = 1..1000</a> %F A024914 a(n) = 1 + A102342(n). - _R. J. Mathar_, Sep 25 2013 %p A024914 select(k->isprime(10*k-3),[$1..170]); # _Muniru A Asiru_, Jul 15 2018 %t A024914 Select[Range[200], PrimeQ[10#-3]&] (* _Harvey P. Dale_, Nov 22 2012 *) %o A024914 (Magma) [n: n in [1..200] |IsPrime(10*n-3)]; // _Vincenzo Librandi_, Nov 19 2010 %o A024914 (PARI) is(n)=isprime(10*n-3) \\ _Charles R Greathouse IV_, Jun 06 2017 %K A024914 nonn,easy %O A024914 1,2 %A A024914 _Clark Kimberling_