%I #11 Dec 26 2023 09:44:35
%S 1,3,6,11,17,24,32,42,53,65,78,93,109,126,145,165,186,208,232,257,283,
%T 310,339,369,400,432,466,501,537,575,614,654,695,738,782,827,873,921,
%U 970,1020,1071,1124,1178,1233,1290,1348,1407,1467,1529,1592,1656
%N a(n) = Sum_{j=1..n} floor(j*(3-sqrt(3))); n-th partial sum of Beatty sequence for 3-sqrt(3).
%t c[n_] := Sum[Floor[j*(3-Sqrt[3])], {j, 1, n}];
%t c = Table[c[n], {n, 1, 90}]
%Y Partial sums of A182777.
%K nonn
%O 1,2
%A _Clark Kimberling_, Aug 17 2011
|