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 A019363 #16 Aug 04 2023 13:56:56 %S A019363 3,5,7,23,47,59,89,97,101,107,113,149,157,179,193,197,199,227,229,257, %T A019363 263,271,311,359,379,389,397,401,433,449,479,503,521,557,563,569,601, %U A019363 613,641,647,653,659,673,683,701,709,719,727,823,827,853,857,907,919,953,967 %N A019363 Primes with primitive root 38. %H A019363 Vincenzo Librandi, <a href="/A019363/b019363.txt">Table of n, a(n) for n = 1..1000</a> %H A019363 <a href="/index/Pri#primes_root">Index entries for primes by primitive root</a> %t A019363 pr=38; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &] %t A019363 Join[{3,5,7,23},Select[Prime[Range[200]],PrimitiveRoot[#,38]==38&]] (* _Harvey P. Dale_, Aug 04 2023 *) %K A019363 nonn %O A019363 1,1 %A A019363 _David W. Wilson_