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 A137804 #14 Feb 16 2025 08:33:07 %S A137804 2,4,6,8,10,12,14,16,18,20,23,25,27,29,31,33,35,37,39,41,43,46,48,50, %T A137804 52,54,56,58,60,62,64,67,69,71,73,75,77,79,81,83,85,87,90,92,94,96,98, %U A137804 100,102,104,106,108,110,113,115,117,119,121,123,125,127,129,131,134,136 %N A137804 a(n) = floor(n*(4*sqrt(2)+9)/7). %C A137804 a(n) = A059534(n) for n <= 31; %C A137804 Beatty sequence for (4*Sqrt(2)+9)/7; complement of A137803; %C A137804 a(n) = A137805(A137803(n)) and A137805(a(n)) = A137803(n). %H A137804 R. Zumkeller, <a href="/A137804/b137804.txt">Table of n, a(n) for n = 1..1000</a> %H A137804 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/BeattySequence.html">Beatty Sequence</a> %H A137804 <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a> %p A137804 [seq(floor(n*(4*(sqrt(2))+9)/7),n=1..70)]; # _Muniru A Asiru_, Mar 29 2018 %t A137804 Table[Floor[n*(4*Sqrt[2]+9)/7], {n,1,100}] (* _G. C. Greubel_, Mar 28 2018 *) %o A137804 (PARI) for(n=1,100, print1(floor(n*(4*sqrt(2)+9)/7), ", ")) \\ _G. C. Greubel_, Mar 28 2018 %o A137804 (Magma) [Floor(n*(4*Sqrt(2)+9)/7): n in [1..100]]; // _G. C. Greubel_, Mar 28 2018 %Y A137804 Cf. A059534, A137803, A137805 %K A137804 nonn %O A137804 1,1 %A A137804 _Reinhard Zumkeller_, Feb 11 2008