OFFSET
1,2
EXAMPLE
A000002 can be grouped as 1, 22, 11, 2, 1, 22, 1, 22, 11, 2, ... The positions of occurrence of 1's (1, 5, 7, ...) are given in this sequence.
MATHEMATICA
s = {1, 2, 2}; Do[s = Append[s, Mod[n-1, 2] + 1], {n, 3, 230}, {s[[n]]}]; Position[Split[s], {1}] // Flatten (* Amiram Eldar, Jul 24 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Rakesh Khanna A, May 22 2020
STATUS
approved