A182761 - OEIS

%I #17 Sep 08 2022 08:45:55

%S 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 59,61,64,66,69,71,73,76,78,80,83,85,88,90,92,95,97,100,102,104,107,

%U 109,111,114,116,119,121,123,126,128,131,133

%N Beatty sequence for (7 - sqrt(5))/2.

%C 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 Vincenzo Librandi, <a href="/A182761/b182761.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = floor(n*(7 - sqrt(5))/2).

%t Table[Floor[n*(7-Sqrt[5])/2], {n,1,80}] (* _G. C. Greubel_, Jul 08 2018 *)

%o (Magma) [Floor(n*(7-5^(1/2))/2): n in [1..80]]; // _Vincenzo Librandi_, Oct 25 2011

%o (PARI) for(n=1,80, print1(floor(n*(7-sqrt(5))/2), ", ")) \\ _G. C. Greubel_, Jul 08 2018

%Y Cf. A182760.

%K nonn

%O 1,1

%A _Clark Kimberling_, Nov 28 2010

%E Typo in formula corrected by _Vincenzo Librandi_, Oct 25 2011