A021307 Decimal expansion of 1/303.
0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3, 3, 0, 0, 3
Offset: 0
Examples
0.003300330033003300330033...
Links
- Index entries for linear recurrences with constant coefficients, signature (1,-1,1).
Crossrefs
Cf. A021913.
Programs
-
Mathematica
Join[{0,0},RealDigits[1/303,10,120][[1]]] (* or *) PadRight[{},120,{0,0,3,3}] (* Harvey P. Dale, May 29 2017 *)
Formula
From Chai Wah Wu, Apr 18 2024: (Start)
a(n) = a(n-1) - a(n-2) + a(n-3) for n > 2.
G.f.: -3*x^2/((x - 1)*(x^2 + 1)). (End)
Equals 3*A021913. - Hugo Pfoertner, Apr 18 2024