A269454 Safe primes that are not congruent to -1 mod 8.
5, 11, 59, 83, 107, 179, 227, 347, 467, 563, 587, 1019, 1187, 1283, 1307, 1523, 1619, 1907, 2027, 2099, 2459, 2579, 2819, 2963, 3203, 3467, 3779, 3803, 3947, 4139, 4259, 4283, 4547, 4787, 5099, 5387, 5483, 5507, 5939, 6659, 6779, 6827, 6899, 7187, 7523
Offset: 1
Keywords
References
- Henri Cohen, Graduate Texts In Mathematics: A Course in Computational Algebraic Number Theory, Springer, 2000, p. 25
- Trygve Nagell, Introduction to Number Theory, Chelsea, 1964, p. 106.
- Kenneth H. Rosen, Elementary Number Theory And Its Applications, AT&T Laboratories, 2005, p. 334
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[ p: p in PrimesUpTo(8000) | IsPrime((p-1) div 2) and not p mod 8 eq 7]; // Vincenzo Librandi, Feb 28 2016
-
Mathematica
Select[Prime@ Range@ 1000, And[PrimeQ[(# - 1)/2], MemberQ[Range[0, 6], Mod[#, 8]]] &] (* Michael De Vlieger, Feb 28 2016 *)
-
PARI
lista(nn) = {forprime(p=3, nn, if (((p % 8) != 7) && isprime((p-1)/2), print1(p, ", ")););} \\ Michel Marcus, Mar 24 2016
Extensions
More terms from Vincenzo Librandi, Feb 28 2016
Comments