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

%I #21 Jul 18 2023 07:32:24

%S 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,

%T 35,36,37,39,41,42,43,44,46,48,49,50,51,53,55,56,57,58,60,62,63,64,65,

%U 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

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

%H <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,1,-1).

%F 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

%t 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 *)

%K nonn

%O 1,3

%A _N. J. A. Sloane_