|
%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
|
