login
Primes p with Jacobi symbol (p|3*5) = 1.
25

%I #19 May 23 2021 03:01:26

%S 2,17,19,23,31,47,53,61,79,83,107,109,113,137,139,151,167,173,181,197,

%T 199,211,227,229,233,241,257,263,271,293,317,331,347,349,353,379,383,

%U 409,421,439,443,467,499,503,541,557,563,571,587,593,601,617,619,631

%N Primes p with Jacobi symbol (p|3*5) = 1.

%C Originally incorrectly named "Primes that are squares mod 15", which is the subsequence A033212. The present sequence also includes primes which are not square mod 3 neither mod 5, i.e., with Legendre symbols (p|3) = (p|5) = -1. - _David Broadhurst_ and _M. F. Hasler_, Jan 15 2016

%C Primes congruent to {1, 2, 4, 8} mod 15. - _Wolfdieter Lang_, May 19 2021

%H Vincenzo Librandi, <a href="/A191018/b191018.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[200]], JacobiSymbol[#,15]==1&]

%o (PARI) is(p)=kronecker(p,15)==1&&isprime(p) \\ _M. F. Hasler_, Jan 15 2016

%Y Cf. A316569.

%Y Primes of A341786, except 3 and 5.

%K nonn,easy

%O 1,1

%A _T. D. Noe_, May 24 2011

%E Name corrected upon suggestion from _David Broadhurst_ by _M. F. Hasler_, Jan 15 2016