A247681 Odd nonprimes congruent to 1 modulo 9.

1, 55, 91, 145, 217, 235, 253, 289, 325, 343, 361, 415, 451, 469, 505, 559, 595, 649, 667, 685, 703, 721, 775, 793, 847, 865, 901, 955, 973, 1027, 1045, 1081, 1099, 1135, 1189, 1207, 1225, 1243, 1261, 1315, 1333, 1351, 1369, 1387, 1405

Offset

1,2

Comments

Subsequence of A017173.

Links

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

Mathematica

Select[18Range[0, 99] + 1, Not[PrimeQ[#]] &] (* Alonso del Arte, Sep 25 2014 *)
Select[Range[1, 1500, 18], !PrimeQ[#]&] (* Harvey P. Dale, Mar 07 2018 *)

Prog

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

Crossrefs

Cf. A017173, A247676, A247678, A247679, A247682, A247683, A247900 (first differences).

Sequence in context: A157484 A230125 A027865 * A195118 A143205 A111192

Adjacent sequences: A247678 A247679 A247680 * A247682 A247683 A247684

Keyword

nonn,easy

Author

Odimar Fabeny, Sep 22 2014

Status

approved