# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a019343 Showing 1-1 of 1 %I A019343 #15 Mar 31 2014 03:34:33 %S A019343 2,13,19,23,29,37,41,47,73,83,89,97,101,107,139,149,151,157,167,193, %T A019343 199,227,263,269,271,281,313,337,347,373,379,383,389,401,433,439,449, %U A019343 457,461,467,499,503,509,521,563,569,577,587,613,619,631,641,647,683,691,701,733 %N A019343 Primes with primitive root 15. %H A019343 Vincenzo Librandi, Table of n, a(n) for n = 1..1000 %H A019343 Index entries for primes by primitive root %t A019343 pr=15; Select[Prime[Range[200]], MultiplicativeOrder[pr, # ] == #-1 &] %K A019343 nonn %O A019343 1,1 %A A019343 _David W. Wilson_ # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE