OFFSET
1
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = floor((n+1)*(1-1/r) - floor(n*(1-1/r))), where r = sqrt(3). [corrected by Georg Fischer, Aug 31 2022]
a(n) = floor((n + 1)*(1 - 1/r)) - floor(n - n/r). - Peter Luschny, Aug 31 2022
MATHEMATICA
r = Sqrt[3]; Table[Floor[(n + 1) (1 - 1/r) - Floor[n (1 - 1/r)]], {n, 1, 200}]
PROG
(PARI) r=sqrt(3); for(n=1, 100, print1(floor((n+1)*(1-1/r)-floor(n*(1-1/r))), ", ")) \\ _Georg Fischer, Aug 31 2022
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, May 11 2017
STATUS
approved