# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a194147 Showing 1-1 of 1 %I A194147 #9 Feb 27 2023 08:09:44 %S A194147 1,3,7,12,19,27,37,48,61,75,90,107,125,145,166,189,213,239,266,294, %T A194147 324,355,388,422,458,495,534,574,616,659,703,749,796,845,895,947,1000, %U A194147 1055,1111,1168,1227,1287,1349,1412,1477,1543,1611,1680,1751,1823 %N A194147 Sum{floor(j*(-1+sqrt(6))) : 1<=j<=n}; n-th partial sum of Beatty sequence for -1+sqrt(6). %t A194147 c[n_] := Sum[Floor[j*(-1+Sqrt[6])], {j, 1, n}]; %t A194147 c = Table[c[n], {n, 1, 90}] %t A194147 Accumulate[Floor[(Sqrt[6]-1)Range[50]]] (* _Harvey P. Dale_, Sep 21 2021 *) %Y A194147 Cf. A194145 (Beatty sequence for -1+sqrt(6). %K A194147 nonn %O A194147 1,2 %A A194147 _Clark Kimberling_, Aug 17 2011 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE