A021078 Decimal expansion of 1/74.
0, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5, 1, 3, 5
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (0,0,1).
Programs
-
Maple
a:= n-> `if`(n=0, 0, irem(2*n-1, 6)): seq(a(n), n=0..99); # Zerinvary Lajos, Nov 30 2006
-
Mathematica
Table[Mod[2 n - 1, 6] - 5 Floor[1/(n+1)], {n, 0, 100}] (* Wesley Ivan Hurt, Apr 23 2014 *)
Formula
a(n) = (2n-1) mod 6, for n > 0. - Wesley Ivan Hurt, Apr 23 2014