A047295 Numbers that are congruent to {0, 1, 2, 4, 6} mod 7.

0, 1, 2, 4, 6, 7, 8, 9, 11, 13, 14, 15, 16, 18, 20, 21, 22, 23, 25, 27, 28, 29, 30, 32, 34, 35, 36, 37, 39, 41, 42, 43, 44, 46, 48, 49, 50, 51, 53, 55, 56, 57, 58, 60, 62, 63, 64, 65, 67, 69, 70, 71, 72, 74, 76, 77, 78, 79, 81, 83, 84, 85, 86, 88, 90, 91, 92, 93, 95, 97, 98, 99, 100

Offset

1,3

Links

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

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

Formula

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

Mathematica

Select[Range[0, 100], MemberQ[{0, 1, 2, 4, 6}, Mod[#, 7]]&] (* or *) LinearRecurrence[ {1, 0, 0, 0, 1, -1}, {0, 1, 2, 4, 6, 7}, 60] (* Harvey P. Dale, Nov 24 2018 *)

Crossrefs

Sequence in context: A101616 A322678 A285137 * A039045 A050481 A285416

Adjacent sequences: A047292 A047293 A047294 * A047296 A047297 A047298

Keyword

nonn

Author

N. J. A. Sloane

Status

approved