A047326 Numbers that are congruent to {0, 1, 2, 5, 6} mod 7.

0, 1, 2, 5, 6, 7, 8, 9, 12, 13, 14, 15, 16, 19, 20, 21, 22, 23, 26, 27, 28, 29, 30, 33, 34, 35, 36, 37, 40, 41, 42, 43, 44, 47, 48, 49, 50, 51, 54, 55, 56, 57, 58, 61, 62, 63, 64, 65, 68, 69, 70, 71, 72, 75, 76, 77, 78

Offset

1,3

Links

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

Index entries for linear recurrences with constant coefficients, signature (1,0,0,0,1,-1).

Formula

G.f.: x^2*(1 + x + 3*x^2 + x^3 + x^4) / ( (1 + x + x^2 + x^3 + x^4)*(x-1)^2 ). - R. J. Mathar, Dec 04 2011

Mathematica

DeleteCases[Range[0, 100], _?(MemberQ[{3, 4}, Mod[#, 7]]&)] (* or *) LinearRecurrence[ {1, 0, 0, 0, 1, -1}, {0, 1, 2, 5, 6, 7}, 90] (* Harvey P. Dale, Aug 06 2018 *)

Crossrefs

Sequence in context: A228090 A287440 A111175 * A039044 A212441 A182783

Adjacent sequences: A047323 A047324 A047325 * A047327 A047328 A047329

Keyword

nonn

Author

N. J. A. Sloane

Status

approved