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 A182761 #17 Sep 08 2022 08:45:55
%S A182761 2,4,7,9,11,14,16,19,21,23,26,28,30,33,35,38,40,42,45,47,50,52,54,57,
%T A182761 59,61,64,66,69,71,73,76,78,80,83,85,88,90,92,95,97,100,102,104,107,
%U A182761 109,111,114,116,119,121,123,126,128,131,133
%N A182761 Beatty sequence for (7 - sqrt(5))/2.
%C A182761 See the first comment at A182760; its complement, A182761, gives the positions of the numbers k*sqrt(5) when these numbers and the numbers j*u, where u = golden ratio, are jointly ranked.
%H A182761 Vincenzo Librandi, <a href="/A182761/b182761.txt">Table of n, a(n) for n = 1..10000</a>
%F A182761 a(n) = floor(n*(7 - sqrt(5))/2).
%t A182761 Table[Floor[n*(7-Sqrt[5])/2], {n,1,80}] (* _G. C. Greubel_, Jul 08 2018 *)
%o A182761 (Magma) [Floor(n*(7-5^(1/2))/2): n in [1..80]]; // _Vincenzo Librandi_, Oct 25 2011
%o A182761 (PARI) for(n=1,80, print1(floor(n*(7-sqrt(5))/2), ", ")) \\ _G. C. Greubel_, Jul 08 2018
%Y A182761 Cf. A182760.
%K A182761 nonn
%O A182761 1,1
%A A182761 _Clark Kimberling_, Nov 28 2010
%E A182761 Typo in formula corrected by _Vincenzo Librandi_, Oct 25 2011