A100490 Odd numbers ending in {1,3,7,9} that are not primes.
1, 9, 21, 27, 33, 39, 49, 51, 57, 63, 69, 77, 81, 87, 91, 93, 99, 111, 117, 119, 121, 123, 129, 133, 141, 143, 147, 153, 159, 161, 169, 171, 177, 183, 187, 189, 201, 203, 207, 209, 213, 217, 219, 221, 231, 237, 243, 247, 249, 253, 259, 261, 267, 273, 279, 287
Offset: 0
Keywords
Programs
-
Mathematica
Select[Range[1,311,2],MemberQ[{1,3,7,9},Mod[#,10]]&&!PrimeQ[#]&] (* Harvey P. Dale, Sep 01 2024 *)
Comments