OFFSET
1,2
COMMENTS
Beatty sequence for (6+sqrt(6))/5; complement of A022840;
Numbers k such that A248515(k+1) = A248515(k) = least number h such that 1 - h*sin(1/h) < 1/n^2. The difference sequence of A248515 is (0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, ...), so that A138235 = (1, 3, 5, 6, 8, ...) and A022840 = (2, 4, 7, 9, 12, 14, ...). - Clark Kimberling, Jun 16 2015
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..1000
Clark Kimberling, Beatty sequences and trigonometric functions, Integers 16 (2016), #A15.
Eric Weisstein's World of Mathematics, Beatty Sequence
MATHEMATICA
With[{c=6+Sqrt[6]}, Table[Floor[(n*c)/5], {n, 80}]] (* Harvey P. Dale, Feb 25 2013 *)
PROG
(Magma) [Floor(n*(6+Sqrt(6))/5): n in [1..70]]; // Vincenzo Librandi, Jun 17 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Mar 07 2008
STATUS
approved