A021500 Decimal expansion of 1/496.

0, 0, 2, 0, 1, 6, 1, 2, 9, 0, 3, 2, 2, 5, 8, 0, 6, 4, 5, 1, 6, 1, 2, 9, 0, 3, 2, 2, 5, 8, 0, 6, 4, 5, 1, 6, 1, 2, 9, 0, 3, 2, 2, 5, 8, 0, 6, 4, 5, 1, 6, 1, 2, 9, 0, 3, 2, 2, 5, 8, 0, 6, 4, 5, 1, 6, 1, 2, 9, 0, 3, 2, 2, 5, 8, 0, 6, 4, 5, 1, 6, 1, 2, 9, 0, 3, 2, 2, 5, 8, 0, 6, 4, 5, 1, 6, 1, 2, 9

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• cons

Links

• Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,0,0,0,0,0,0,0,0,0,1).

Programs

Mathematica

Join[{0,0},RealDigits[1/496,10,120][[1]]] (* or *) PadRight[{0,0,2,0},120,{0,6,4,5,1,6,1,2,9,0,3,2,2,5,8}] (* Harvey P. Dale, Oct 02 2021 *)
realDigitsRecip[496] (* The realDigitsRecip program is at A021200 *) (* Harvey P. Dale, Jan 30 2025 *)

Formula

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

a(n) = a(n-15) for n > 18.

G.f.: -x^2*(5*x^16 + 2*x^15 + 6*x^14 + 8*x^12 + 5*x^11 + 2*x^10 + 2*x^9 + 3*x^8 + 9*x^6 + 2*x^5 + x^4 + 6*x^3 + x^2 + 2)/(x^15 - 1). (End)