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 A061733 #12 Feb 01 2016 02:53:51 %S A061733 15791,18191,20231,33049,33289,33601,35279,38639,46489,47041,47881, %T A061733 61681,63839,64279,76831,87481,87911,89041,110569,120121,130729, %U A061733 143263,147671,159769,193751,199559,210961,217439,217561,231961,238681,240769 %N A061733 Primes with 29 as smallest positive primitive root. %H A061733 Vincenzo Librandi, <a href="/A061733/b061733.txt">Table of n, a(n) for n = 1..8000</a> %t A061733 Prime[ Select[ Range[22000], PrimitiveRoot[ Prime[ # ] ] == 29 & ] ] %t A061733 (* or *) %t A061733 Select[ Prime@Range@22000, PrimitiveRoot@# == 29 &] (* _Robert G. Wilson v_, May 11 2001 *) %Y A061733 Cf. A001918, A001126, A019355. %K A061733 nonn %O A061733 1,1 %A A061733 _Klaus Brockhaus_, May 06 2001