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 A061331 #13 Feb 01 2016 02:52:58 %S A061331 191,1559,2287,2689,4751,5113,5711,6361,9239,10391,10799,14281,14407, %T A061331 14951,16631,17761,19087,19489,19843,21121,22129,24049,25321,27541, %U A061331 28031,28081,34319,34919,36217,36241,36599,37489,40031,41761,42719 %N A061331 Primes with 19 as smallest positive primitive root. %H A061331 T. D. Noe, <a href="/A061331/b061331.txt">Table of n, a(n) for n=1..1000</a> %t A061331 Prime[ Select[ Range[4500], PrimitiveRoot[ Prime[ # ] ] == 19 & ] ] %t A061331 (* or *) %t A061331 Select[ Prime@Range@4500, PrimitiveRoot@# == 19 &] (* _Robert G. Wilson v_, May 11 2001 *) %Y A061331 Cf. A001918, A001126, A019346. %K A061331 nonn %O A061331 1,1 %A A061331 _Klaus Brockhaus_, Apr 25 2001