OFFSET
1,2
COMMENTS
FORMULA
a(n)=floor(s*n), where s=1+sqrt(6)-sqrt(5).
MATHEMATICA
k=6; r=1+k^(1/2)+(k-1)^(1/2); s=1+k^(1/2)-(k-1)^(1/2);
Table[Floor[r*n], {n, 1, 80}] (* A187387 *)
Table[Floor[s*n], {n, 1, 80}] (* A187388 *)
With[{c=1+Sqrt[6]-Sqrt[5]}, Table[Floor[c n], {n, 120}]] (* Harvey P. Dale, Jul 27 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Mar 09 2011
STATUS
approved