|
%I #9 Feb 21 2023 16:11:46
%S 0,0,2,4,8,1,3,8,9,5,7,8,1,6,3,7,7,1,7,1,2,1,5,8,8,0,8,9,3,3,0,0,2,4,
%T 8,1,3,8,9,5,7,8,1,6,3,7,7,1,7,1,2,1,5,8,8,0,8,9,3,3,0,0,2,4,8,1,3,8,
%U 9,5,7,8,1,6,3,7,7,1,7,1,2,1,5,8,8,0,8,9,3,3,0,0,2,4,8,1,3,8,9
%N Decimal expansion of 1/403.
%H <a href="/index/Rec#order_28">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,-1,1,0,-1,1,0,-1,1,0,-1,1,0,-1,1,0,-1,1,0,-1,1,0,-1,1,0,-1,1).
%F From _Chai Wah Wu_, Aug 11 2020: (Start)
%F a(n) = a(n-1) - a(n-3) + a(n-4) - a(n-6) + a(n-7) - a(n-9) + a(n-10) - a(n-12) + a(n-13) - a(n-15) + a(n-16) - a(n-18) + a(n-19) - a(n-21) + a(n-22) - a(n-24) + a(n-25) - a(n-27) + a(n-28) for n > 27.
%F G.f.: x^2*(-3*x^25 - 6*x^23 - 2*x^22 + 8*x^21 - 14*x^20 - 2*x^19 + 11*x^18 - 10*x^17 - 3*x^16 + 12*x^15 - 16*x^14 + 3*x^13 + 6*x^12 - 16*x^11 + 7*x^10 + 3*x^9 - 11*x^8 + 4*x^6 - 9*x^5 - 4*x^4 + 5*x^3 - 4*x^2 - 2*x - 2)/(x^28 - x^27 + x^25 - x^24 + x^22 - x^21 + x^19 - x^18 + x^16 - x^15 + x^13 - x^12 + x^10 - x^9 + x^7 - x^6 + x^4 - x^3 + x - 1). (End)
%t Join[{0,0},RealDigits[1/403,10,120][[1]]] (* _Harvey P. Dale_, Feb 21 2023 *)
%K nonn,cons
%O 0,3
%A _N. J. A. Sloane_.
|
