login
First term of n-th difference sequence of (floor(r*k)), r = -(1+sqrt(5))/2, k >= 0.
2

%I #4 Jun 06 2019 22:00:45

%S -2,0,1,-3,6,-9,9,1,-36,126,-326,726,-1452,2640,-4356,6436,-8256,8568,

%T -5864,456,-911,40106,-210419,733448,-2085526,5200300,-11748374,

%U 24416952,-46909838,82930836,-132479946,182029056,-182029056,0,670853984,-2480588544

%N First term of n-th difference sequence of (floor(r*k)), r = -(1+sqrt(5))/2, k >= 0.

%H Clark Kimberling, <a href="/A325746/b325746.txt">Table of n, a(n) for n = 1..200</a>

%t Table[First[Differences[Table[Floor[-GoldenRatio*n], {n, 0, 50}], n]], {n, 2, 50}]

%Y Cf. A000201, A001622, A325745, A325664.

%K easy,sign

%O 1,1

%A _Clark Kimberling_, Jun 06 2019