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 A061734 #13 Feb 01 2016 02:53:59 %S A061734 124153,133261,140071,209353,343381,384913,948391,984817,1151473, %T A061734 1189471,1282909,1516759,1517101,1629031,1666711,1736617,1819273, %U A061734 1918879,1998793,2142271,2176831,2201671,2306221,2314231,2526781,2534101,2557501,2566261,3131353,3150391 %N A061734 Primes with 30 as smallest positive primitive root. %H A061734 Vincenzo Librandi, <a href="/A061734/b061734.txt">Table of n, a(n) for n = 1..530</a> %t A061734 Prime[ Select[ Range[100000], PrimitiveRoot[ Prime[ # ] ] == 30 & ] ] %t A061734 (* or *) %t A061734 Select[ Prime@Range@100000, PrimitiveRoot@# == 30 &] (* _Robert G. Wilson v_, May 11 2001 *) %Y A061734 Cf. A001918, A001126, A019356. %K A061734 nonn %O A061734 1,1 %A A061734 _Klaus Brockhaus_, May 06 2001 %E A061734 More terms from _Robert G. Wilson v_, May 11 2001 %E A061734 a(12)-a(30) from _Vincenzo Librandi_, Sep 22 2013