login
A182996
Numbers congruent to 2 (mod 4) that are not in A182991.
2
30, 70, 90, 126, 150, 154, 182, 198, 210, 234, 270, 286, 306, 330, 350, 374, 378, 390, 418, 442, 450, 462, 490, 494, 510, 546, 570, 594, 598, 630, 646, 650, 690, 702, 714, 750, 770, 782, 798, 810, 850, 858, 870, 874, 882, 910, 918, 930, 950, 966, 986, 990
OFFSET
1,1
MATHEMATICA
OddEvenQ[a_List] := Module[{b = Mod[a, 2]}, Union[b[[1 ;; ;; 2]]] == {1} && Union[b[[2 ;; ;; 2]]] == {0}]; Select[2 + 4 Range[300], ! OddEvenQ[Divisors[#]] &] (* T. D. Noe, Aug 04 2011 *)
CROSSREFS
Cf. A016825.
Sequence in context: A359545 A064623 A112343 * A325378 A164596 A295102
KEYWORD
nonn
AUTHOR
Omar E. Pol, Aug 04 2011
STATUS
approved