A286355 Beatty sequence of (10 + sqrt(10))/9; complement of A177102.
1, 2, 4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 21, 23, 24, 26, 27, 29, 30, 32, 33, 35, 36, 38, 39, 40, 42, 43, 45, 46, 48, 49, 51, 52, 54, 55, 57, 58, 59, 61, 62, 64, 65, 67, 68, 70, 71, 73, 74, 76, 77, 78, 80, 81, 83, 84, 86, 87, 89, 90, 92, 93, 95, 96
Offset: 1
Links
- Clark Kimberling, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
v = (10 + Sqrt[10])/9; Table[Floor[n*v], {n, 1, 100}]