A135657 Nonprimes of the form 24n+7.
55, 175, 247, 295, 319, 343, 391, 415, 511, 535, 559, 583, 655, 679, 703, 775, 799, 847, 871, 895, 943, 1015, 1111, 1135, 1159, 1183, 1207, 1255, 1351, 1375, 1495, 1519, 1591, 1615, 1639, 1687, 1711, 1735, 1807, 1855, 1903, 1927, 1975, 2023, 2047, 2071
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[a: n in [0..100] | not IsPrime(a) where a is 24*n+7]; // Vincenzo Librandi, Mar 22 2014
-
Mathematica
a = {}; Do[If[PrimeQ[24n + 7],[null], AppendTo[a, 24n + 7]], {n, 0, 1000}]; a Select[24 Range[100] + 7, ! PrimeQ@# &] (* Vincenzo Librandi, Mar 22 2014 *)