A021407 Decimal expansion of 1/403.

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

Offset

0,3

Links

Table of n, a(n) for n=0..98.

Index entries for linear recurrences with constant coefficients, 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).

Formula

From Chai Wah Wu, Aug 11 2020: (Start)

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.

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)

Mathematica

Join[{0, 0}, RealDigits[1/403, 10, 120][[1]]] (* Harvey P. Dale, Feb 21 2023 *)

Crossrefs

Sequence in context: A317414 A008952 A268516 * A131609 A210022 A210026

Adjacent sequences: A021404 A021405 A021406 * A021408 A021409 A021410

Keyword

nonn,cons

Author

N. J. A. Sloane.

Status

approved