A021139 Decimal expansion of 1/135.
0, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7, 4, 0, 7
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (0, 0, 1).
Programs
-
Mathematica
PadLeft[First@ #, Abs@ Last@ # + Length@ First@ #] &@ RealDigits[N[1/135, 120]] (* Bruno Berselli, Jun 21 2016 *) Join[{0,0},RealDigits[1/135,10,120][[1]]] (* or *) PadRight[{0},120,{4,0,7}] (* Harvey P. Dale, Jun 16 2023 *)