A291745 Nonprimes of the form 3*k + 1.
1, 4, 10, 16, 22, 25, 28, 34, 40, 46, 49, 52, 55, 58, 64, 70, 76, 82, 85, 88, 91, 94, 100, 106, 112, 115, 118, 121, 124, 130, 133, 136, 142, 145, 148, 154, 160, 166, 169, 172, 175, 178, 184, 187, 190, 196, 202, 205, 208, 214, 217, 220, 226, 232, 235, 238, 244, 247
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1600
Crossrefs
Programs
-
Magma
[n: n in [1..400 by 3] | not IsPrime(n)];
-
Mathematica
DeleteCases[3 Range[0, 300] + 1, _?PrimeQ]
Comments