A325666 First term of n-th difference sequence of (floor(k*r)), r = sqrt(3), k >= 0.
1, 1, -1, 0, 3, -9, 19, -35, 63, -119, 239, -495, 1023, -2079, 4158, -8239, 16247, -31823, 61402, -115291, 207669, -352715, 550429, -748143, 748143, 1, -2848367, 10897033, -30955333, 77558760, -181129041, 404458737, -875889377, 1855921144, -3870685665
Offset: 1
Links
- Clark Kimberling, Table of n, a(n) for n = 1..200
Programs
-
Mathematica
Table[First[Differences[Table[Floor[Sqrt[3]*n], {n, 0, 50}], n]], {n, 1, 50}]