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 A190772 #10 Aug 27 2021 05:59:09 %S A190772 2,3,6,9,13,16,20,23,26,30,33,37,40,43,44,47,50,54,57,60,61,64,67,71, %T A190772 74,78,81,84,85,88,91,95,98,101,102,105,108,112,115,119,122,125,129, %U A190772 132,136,139,142,143,146,149,153,156,159,160,163,166,170,173,177,180,183,184,187,190,194,197,200,201,204,207,211,214,218,221,224,225,228,231,235,238,241,242 %N A190772 Positions of 1 in A190770. %C A190772 See A190770. %t A190772 r = Sqrt[1/2]; b = 3; c = 1; %t A190772 f[n_] := Floor[(b*n + c)*r] - b*Floor[n*r] - Floor[c*r]; %t A190772 t = Table[f[n], {n, 1, 300}] (* A190770 *) %t A190772 Flatten[Position[t, 1]] (* A190772 *) %Y A190772 Cf. A190770. %K A190772 nonn %O A190772 1,1 %A A190772 _Clark Kimberling_, May 19 2011 %E A190772 a(76)=225 inserted by _Georg Fischer_, Aug 27 2021