%I #4 Jun 07 2019 22:00:47
%S 1,0,1,-3,6,-9,9,0,-27,81,-161,231,-165,-363,2079,-6435,16071,-35343,
%T 70686,-130339,222717,-352715,515944,-692967,849299,-950455,996435,
%U -1042415,1042415,0,-6926040,36515985,-137544209,436316441,-1233171500,3195484765
%N First term of n-th difference sequence of (floor(r*k)), r = (1+sqrt(3))/2, k >= 0.
%H Clark Kimberling, <a href="/A325750/b325750.txt">Table of n, a(n) for n = 1..200</a>
%t Table[First[Differences[Table[Floor[n*(1+sqrt(3))/2)], {n, 0, 50}], n]], {n, 1, 50}]
%Y Cf. A003511.
%K easy,sign
%O 1,4
%A _Clark Kimberling_, Jun 07 2019