A247676 Odd composite numbers congruent to 2 modulo 9.

65, 119, 155, 209, 245, 299, 335, 371, 407, 425, 497, 515, 533, 551, 605, 623, 695, 713, 731, 749, 767, 785, 803, 875, 893, 965, 1001, 1037, 1055, 1073, 1127, 1145, 1199, 1235, 1253, 1271, 1325, 1343, 1379, 1397, 1415, 1469, 1505, 1541, 1577, 1595, 1631, 1649

Offset: 1

Author

Odimar Fabeny, Sep 22 2014

Keywords

• nonn
• easy

Comments

Subsequence of A017185 (9n+2).

Composites == 11 mod 18. - Robert Israel, Sep 24 2014

Links

• Odimar Fabeny, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A017185, A247678, A247679, A247681, A247682, A247683.

Programs

Maple

remove(isprime,[seq(18*k+11,k=1..1000)]); # Robert Israel, Sep 24 2014

Mathematica

Select[18Range[100] + 11, Not[PrimeQ[#]] &] (* Alonso del Arte, Sep 25 2014 *)
Select[Range[11,2000,18],CompositeQ] (* Harvey P. Dale, Oct 29 2023 *)

PARI

lista(nn) = {forcomposite(n=1, nn, if ((n % 2) && ((n % 9) == 2), print1(n, ", ")););} \\ Michel Marcus, Sep 22 2014