login
Beatty sequence for sqrt(10).
8

%I #31 Jun 25 2022 21:43:50

%S 3,6,9,12,15,18,22,25,28,31,34,37,41,44,47,50,53,56,60,63,66,69,72,75,

%T 79,82,85,88,91,94,98,101,104,107,110,113,117,120,123,126,129,132,135,

%U 139,142,145,148,151,154,158,161,164,167,170,173,177,180,183

%N Beatty sequence for sqrt(10).

%H Vincenzo Librandi, <a href="/A177102/b177102.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = floor(n*sqrt(10)).

%t Table[Floor[n*Sqrt[10]],{n,1,100}]

%o (Magma) [Floor(n*Sqrt(10)): n in [1..60]]; // _Vincenzo Librandi_, Oct 24 2011

%o (PARI) for(n=1,50, print1(floor(n*sqrt(10)), ", ")) \\ _G. C. Greubel_, Sep 24 2017

%Y Cf. A010467, A194113.

%Y Partial sums of A081168.

%K nonn,easy

%O 1,1

%A _Clark Kimberling_, Aug 16 2011