A021217 Decimal expansion of 1/213.
0, 0, 4, 6, 9, 4, 8, 3, 5, 6, 8, 0, 7, 5, 1, 1, 7, 3, 7, 0, 8, 9, 2, 0, 1, 8, 7, 7, 9, 3, 4, 2, 7, 2, 3, 0, 0, 4, 6, 9, 4, 8, 3, 5, 6, 8, 0, 7, 5, 1, 1, 7, 3, 7, 0, 8, 9, 2, 0, 1, 8, 7, 7, 9, 3, 4, 2, 7, 2, 3, 0, 0, 4, 6, 9, 4, 8, 3, 5, 6, 8, 0, 7, 5, 1, 1, 7, 3, 7, 0, 8, 9, 2, 0, 1, 8, 7, 7, 9
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1).
Programs
-
Mathematica
Join[{0,0},RealDigits[1/213,10,120][[1]]] (* or *) PadRight[{},120, {0,0,4,6,9,4,8,3,5,6, 8,0,7,5,1,1,7,3,7,0,8,9,2,0,1,8,7, 7,9,3,4,2,7,2,3}] (* Harvey P. Dale, Jan 15 2023 *) realDigitsRecip[213] (* The realDigitsRecip program is at A021200 *) (* Harvey P. Dale, Aug 26 2024 *)
Comments