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 A103401 #25 Sep 08 2022 08:45:16 %S A103401 0,4,6,7,10,12,18,19,21,27,28,30,33,34,49,58,61,63,67,72,75,84,87,88, %T A103401 96,105,108,109,111,115,118,126,130,135,142,147,150,154,157,163,165, %U A103401 168,175,177,180,181,184,186,187,199,201,205,214,216,223,228,234,235,249,256,258,259,264,268,271,279 %N A103401 Numbers k such that k211 is prime. %C A103401 Also numbers k such that 1000*k+211 is prime. - _Stefan Steinerberger_, Feb 12 2006 %H A103401 Harvey P. Dale, <a href="/A103401/b103401.txt">Table of n, a(n) for n = 1..1000</a> %e A103401 If k=27, then k211 = 27211 (prime). %e A103401 If k=72, then k211 = 72211 (prime). %t A103401 For[n = 0, n < 220, n++, If[PrimeQ[1000*n + 211], Print[n]]] (* _Stefan Steinerberger_, Feb 12 2006 *) %t A103401 Select[Range[0,300],PrimeQ[1000#+211]&] (* _Harvey P. Dale_, Dec 14 2021 *) %o A103401 (Magma) [ n: n in [0..700] | IsPrime(Seqint([1, 1, 2] cat Intseq(n))) ]; // _Vincenzo Librandi_, Feb 03 2011 %Y A103401 Cf. A103118, A102624. %K A103401 base,nonn %O A103401 1,2 %A A103401 _Parthasarathy Nambi_, Mar 20 2005 %E A103401 More terms from _Stefan Steinerberger_, Feb 12 2006