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 A184581 #19 Sep 08 2022 08:45:55 %S A184581 4,7,11,14,17,21,24,28,31,34,38,41,45,48,52,55,58,62,65,69,72,75,79, %T A184581 82,86,89,93,96,99,103,106,110,113,116,120,123,127,130,134,137,140, %U A184581 144,147,151,154,157,161,164,168,171,174,178,181,185,188,192,195,198 %N A184581 a(n) = floor((n + 1/4)*(2 + sqrt(2))). %C A184581 Complement of A184580. %H A184581 Clark Kimberling, <a href="/A184581/b184581.txt">Table of n, a(n) for n = 1..10000</a> %t A184581 r=2^(1/2); c=1/4; s=r/(r-1); %t A184581 Table[Floor[n*r-c*r],{n,1,120}] (* A184580 *) %t A184581 Table[Floor[n*s+c*s],{n,1,120}] (* this sequence *) %o A184581 (Magma) [Floor((n+1/4)*(2+Sqrt(2))): n in [1..60]]; // _Vincenzo Librandi_, Jun 10 2015 %o A184581 (PARI) for(n=1,30, print1(floor((n+1/4)*(2+sqrt(2))), ", ")) \\ _G. C. Greubel_, Jan 27 2018 %Y A184581 Cf. A184580. %K A184581 nonn %O A184581 1,1 %A A184581 _Clark Kimberling_, Jan 17 2011