%I #4 Jun 07 2019 22:00:40
%S 1,1,-2,4,-8,16,-31,56,-91,126,-126,0,462,-1715,4704,-11319,25186,
%T -52920,105841,-201704,364819,-620312,973028,-1352078,1486674,-657799,
%U -2750022,11967739,-32805248,74480266,-148960531,265105676,-408608551,487599186,-201501426
%N First term of n-th difference sequence of (floor(e*k/(e-1))), k >= 0.
%H Clark Kimberling, <a href="/A325749/b325749.txt">Table of n, a(n) for n = 1..200</a>
%t Table[First[Differences[Table[Floor[n*E/(E-1)], {n, 0, 50}], n]], {n, 1, 50}]
%Y Cf. A054385.
%K easy,sign
%O 1,3
%A _Clark Kimberling_, Jun 07 2019