This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A335075 #26 May 31 2022 12:53:37 %S A335075 1,5,7,13,17,23,25,29,31,37,41,43,49,51,55,59,61,67,71,73,79,85,91,95, %T A335075 97,101,103,109,113,115,121,125,131,133,137,141,143,149,155,157,161, %U A335075 167,173,175,179,185,187,191,193,199,201,205,209,211,217,221,223,227,229 %N A335075 Positions of 1's when Kolakoski sequence is grouped into four independent numbers as 1, 2, 11, 22. %e A335075 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. %t A335075 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 *) %Y A335075 Cf. A000002. %K A335075 nonn %O A335075 1,2 %A A335075 _Rakesh Khanna A_, May 22 2020