# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a296928 Showing 1-1 of 1 %I A296928 #8 Dec 27 2017 01:32:23 %S A296928 7,11,13,17,19,29,31,47,53,59,61,67,71,83,101,113,151,157,163,167,173, %T A296928 181,223,227,233,239,257,269,271,277,307,313,331,337,359,373,379,383, %U A296928 389,431,433,463,479,487,499,521,569,587,601,619,631 %N A296928 Primes p such that Legendre(-13,p) = 0 or 1. %C A296928 Primes == 1, 7, 9, 11, 13, 15, 17, 19, 25, 29, 31, 47, or 49 (mod 52). - _Robert Israel_, Dec 27 2017 %H A296928 Robert Israel, Table of n, a(n) for n = 1..10003 %p A296928 Load the Maple program HH given in A296920. Then run HH(-13, 200); This produces A296926, A296927, A296928, A105885. %p A296928 select(isprime, [seq(seq(52*i+j, j=[1, 7, 9, 11, 13, 15, 17, 19, 25, 29, 31, 47, 49]),i=0..50)]); # _Robert Israel_, Dec 27 2017 %K A296928 nonn %O A296928 1,1 %A A296928 _N. J. A. Sloane_, Dec 26 2017 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE