%I #23 Jul 08 2025 08:21:28

%S 0,0,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,

%T 4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,

%U 2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2,7,4,7,2,5,2

%N Decimal expansion of 1/364.

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

%F From _Chai Wah Wu_, Oct 03 2016: (Start)

%F a(n) = a(n-1) - a(n-3) + a(n-4) for n > 5.

%F G.f.: x^2*(2 + 5*x - 3*x^2 + 5*x^3)/(1 - x + x^3 - x^4). (End)

%t ConstantArray[0, Abs@ Length@ #]~Join~First@ # &@ RealDigits[N[1/364, 120]] (* _Michael De Vlieger_, Oct 03 2016 *)

%t Join[{0,0},RealDigits[1/364,10,120][[1]]] (* or *) PadRight[{0,0},120,{2,5,2,7,4,7}] (* _Harvey P. Dale_, Apr 20 2018 *)

%K nonn,cons

%O 0,3

%A _N. J. A. Sloane_