A036663 Decimal expansion of 1/98019801.
0, 0, 0, 0, 0, 0, 0, 1, 0, 2, 0, 2, 0, 2, 0, 3, 0, 4, 0, 4, 0, 4, 0, 5, 0, 6, 0, 6, 0, 6, 0, 7, 0, 8, 0, 8, 0, 8, 0, 9, 1, 0, 1, 0, 1, 0, 1, 1, 1, 2, 1, 2, 1, 2, 1, 3, 1, 4, 1, 4, 1, 4, 1, 5, 1, 6, 1, 6, 1, 6, 1, 7, 1, 8, 1, 8, 1, 8, 1, 9, 2, 0, 2, 0, 2, 0, 2, 1, 2, 2, 2, 2, 2, 2, 2, 3, 2, 4, 2
Offset: 0
Programs
-
Mathematica
Join[{0,0,0,0,0,0,0},RealDigits[1/98019801 ,10,120][[1]]] (* Harvey P. Dale, Jul 01 2019 *)