login
A184585
a(n) = floor(n*s + c*s), where r = sqrt(5), c = 1/3, s = r/(r-1); complement of A184584.
2
2, 4, 6, 7, 9, 11, 13, 15, 16, 18, 20, 22, 24, 25, 27, 29, 31, 33, 34, 36, 38, 40, 42, 44, 45, 47, 49, 51, 53, 54, 56, 58, 60, 62, 63, 65, 67, 69, 71, 72, 74, 76, 78, 80, 82, 83, 85, 87, 89, 91, 92, 94, 96, 98, 100, 101, 103, 105, 107, 109, 110, 112, 114, 116, 118, 119, 121, 123, 125, 127, 129, 130, 132, 134, 136, 138, 139, 141, 143, 145, 147, 148, 150, 152, 154, 156, 157, 159, 161, 163, 165, 167, 168, 170, 172, 174, 176, 177, 179, 181, 183, 185, 186, 188, 190, 192, 194, 195, 197, 199, 201, 203, 205, 206, 208, 210, 212, 214, 215, 217
OFFSET
1,1
MATHEMATICA
r=5^(1/2); c=1/3; s=r/(r-1);
Table[Floor[n*r-c*r], {n, 1, 120}] (* A184584 *)
Table[Floor[n*s+c*s], {n, 1, 120}] (* A184585 *)
CROSSREFS
Cf. A184584.
Sequence in context: A184654 A047293 A191176 * A287113 A278039 A076521
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 17 2011
EXTENSIONS
Definition corrected by Georg Fischer, Aug 31 2021
STATUS
approved