A032583 Numbers which are neither prime nor lucky.
4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 27, 28, 30, 32, 34, 35, 36, 38, 39, 40, 42, 44, 45, 46, 48, 50, 52, 54, 55, 56, 57, 58, 60, 62, 64, 65, 66, 68, 70, 72, 74, 76, 77, 78, 80, 81, 82, 84, 85, 86, 88, 90, 91, 92, 94, 95, 96, 98, 100, 102, 104, 106, 108
Offset: 1
Keywords
Programs
-
Mathematica
(* First run one of the programs for A000959 to define the list luckies *) max = 200; Complement[Range[max], Prime[Range[PrimePi[max]]], luckies] (* Alonso del Arte, Jun 14 2017 *)
Comments