A021508 Decimal expansion of 1/504.
0, 0, 1, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6, 9, 8, 4, 1, 2, 6
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (2,-2,1).
Programs
-
Mathematica
realDigitsRecip[504] (* The realDigitsRecip program is at A021200 *) (* Harvey P. Dale, May 16 2025 *)
Formula
From Chai Wah Wu, Aug 10 2020: (Start)
a(n) = 2*a(n-1) - 2*a(n-2) + a(n-3) for n > 5.
G.f.: x^2*(-5*x^3 + 8*x^2 - 7*x - 1)/((x - 1)*(x^2 - x + 1)). (End)