A182996 Numbers congruent to 2 (mod 4) that are not in A182991.

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

Links

Table of n, a(n) for n=1..52.

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

Adjacent sequences: A182993 A182994 A182995 * A182997 A182998 A182999

Keyword

nonn

Author

Omar E. Pol, Aug 04 2011

Status

approved