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 A061740 #14 Feb 02 2016 03:41:11 %S A061740 55441,138889,343561,441169,469561,497351,555361,560641,695809,740041, %T A061740 803591,844321,851041,857471,997751,1016401,1071841,1171801,1180537, %U A061740 1220041,1423969,1425601,1495561,1506121,1714441,1740649,1747201,1795369,1842481,1849681,1858081 %N A061740 Primes with 38 as smallest positive primitive root. %H A061740 Vincenzo Librandi, <a href="/A061740/b061740.txt">Table of n, a(n) for n = 1..1300</a> %t A061740 Prime[ Select[ Range[ 100000], PrimitiveRoot[ Prime[ # ] ] == 38 & ] ] %t A061740 (* or *) %t A061740 Select[ Prime@Range@100000, PrimitiveRoot@# == 38 &] (* _Robert G. Wilson v_, May 11 2001 *) %Y A061740 Cf. A001918, A001126, A019363. %K A061740 nonn %O A061740 1,1 %A A061740 _Klaus Brockhaus_, May 06 2001 %E A061740 More terms from _Robert G. Wilson v_, May 11 2001 %E A061740 a(21)-a(30) from _Vincenzo Librandi_, Sep 22 2013