login
A296066
a(n) = A296065(n)/n.
0
0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0
OFFSET
1
COMMENTS
Similar to other sequences such as A059841 but would have to change offset or lag terms to match them.
FORMULA
a(n) =1 if n>=3 odd; a(n) =0 if n>=4 even. - R. J. Mathar, May 14 2024
MATHEMATICA
MapIndexed[#1/First@ #2 &, Accumulate@ #] &@ Nest[Append[#, Block[{k = 1, s = 1}, While[Nand[FreeQ[#, s k], IntegerQ@ Mean[Append[#, s k]]], If[s == 1, s = -1, k++; s = 1]]; s k]] &, {0}, 105] (* Michael De Vlieger, Dec 12 2017 *)
CROSSREFS
Sequence in context: A284912 A192082 A353498 * A073070 A370702 A189687
KEYWORD
nonn,less
AUTHOR
Enrique Navarrete, Dec 04 2017
STATUS
approved