login
A247678
Odd composite numbers congruent to 4 modulo 9.
8
49, 85, 121, 175, 247, 265, 301, 319, 355, 391, 427, 445, 481, 517, 535, 553, 589, 625, 679, 697, 715, 805, 841, 895, 913, 931, 949, 985, 1003, 1057, 1075, 1111, 1147, 1165, 1183, 1219, 1255, 1273, 1309, 1345, 1363, 1417, 1435, 1507, 1525, 1561, 1615, 1633
OFFSET
1,1
LINKS
MATHEMATICA
Select[18Range[125] + 13, Not[PrimeQ[#]] &] (* Alonso del Arte, Sep 24 2014 *)
Select[Range[13, 1700, 18], CompositeQ] (* Harvey P. Dale, Aug 21 2024 *)
PROG
(PARI) lista(nn) = {forcomposite(n=1, nn, if ((n % 2) && ((n % 9) == 4), print1(n, ", ")); ); } \\ Michel Marcus, Sep 22 2014
CROSSREFS
Cf. A017209 (9n + 4, supersequence of this sequence), A247676, A247679, A247681, A247682, A247683.
Sequence in context: A343000 A343022 A250074 * A093894 A259766 A273937
KEYWORD
nonn,easy
AUTHOR
Odimar Fabeny, Sep 22 2014
STATUS
approved