A021711 Decimal expansion of 1/707.

0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7, 0, 0, 1

Offset

0,4

Links

Table of n, a(n) for n=0..98.

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

Formula

From Chai Wah Wu, Apr 22 2024: (Start)

a(n) = a(n-1) - a(n-2) + a(n-3) - a(n-4) + a(n-5) - a(n-6) + a(n-7) - a(n-8) + a(n-9) - a(n-10) + a(n-11) for n > 10.

G.f.: x^2*(-7*x^8 + 2*x^7 - 3*x^6 - 4*x^5 + 2*x^4 - 6*x^3 + 2*x^2 - 3*x - 1)/((x - 1)*(x^2 + 1)*(x^2 - x + 1)*(x^2 + x + 1)*(x^4 - x^2 + 1)). (End)

Example

0.001414427157001414427157001414427157...

Mathematica

Join[{0, 0}, RealDigits[1/707, 10, 120][[1]]] (* or *) PadRight[{}, 120, {0, 0, 1, 4, 1, 4, 4, 2, 7, 1, 5, 7}] (* Harvey P. Dale, Aug 13 2024 *)

Crossrefs

Sequence in context: A229705 A321593 A173259 * A334487 A327304 A117445

Adjacent sequences: A021708 A021709 A021710 * A021712 A021713 A021714

Keyword

nonn,cons,easy

Author

N. J. A. Sloane

Status

approved