A214989 Beatty sequence [sqrt(phi)/(sqrt(phi)-1) * n], where phi = (1 + sqrt(5))/2 = golden ratio; complement of A214988.

4, 9, 14, 18, 23, 28, 32, 37, 42, 46, 51, 56, 60, 65, 70, 74, 79, 84, 88, 93, 98, 102, 107, 112, 116, 121, 126, 130, 135, 140, 144, 149, 154, 158, 163, 168, 173, 177, 182, 187, 191, 196, 201, 205, 210, 215, 219, 224, 229, 233, 238, 243, 247, 252, 257

Offset

1,1

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Mathematica

r = Sqrt[GoldenRatio]; s = r/(r - 1);
Table[Floor[r*n], {n, 1, 120}] (* A214988 *)
Table[Floor[s*n], {n, 1, 120}] (* A214989 *)

Prog

(PARI) A214989(n)=my(sp=sqrt((sqrt(5)+1)/2)); n*sp\(sp-1) \\ - M. F. Hasler, Nov 01 2012

Crossrefs

Cf. A214988.

Sequence in context: A313053 A313054 A038123 * A228177 A172329 A182778

Adjacent sequences: A214986 A214987 A214988 * A214990 A214991 A214992

Keyword

nonn

Author

Clark Kimberling, Oct 28 2012

Status

approved