A257671 Numbers of the form floor(r^i + s^j), where r = (1 + sqrt(5))/2, s = r^2, i >= 0, j >= 0.

2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 17, 18, 19, 20, 22, 24, 29, 30, 31, 35, 46, 47, 48, 49, 51, 53, 58, 64, 76, 77, 78, 82, 93, 122, 123, 124, 125, 127, 129, 134, 140, 152, 169, 199, 200, 201, 205, 216, 245, 321, 322, 323, 324, 326, 328, 333, 339, 351, 368

Offset

1,1

Links

Table of n, a(n) for n=1..60.

Mathematica

mx = 400; r = GoldenRatio; s = r/(r - 1); Union@ Flatten@ Table[ Floor[r^i + s^j], {i, Log[r, mx]}, {j, 0, Log[s, mx - r^i]}] (* iterators modified by Robert G. Wilson v, May 07 2015 *)

Crossrefs

Cf. A001622, A104457.

Cf. A257672.

Sequence in context: A141807 A246422 A072495 * A285523 A126968 A254785

Adjacent sequences: A257668 A257669 A257670 * A257672 A257673 A257674

Keyword

nonn,easy

Author

Clark Kimberling, May 03 2015

Status

approved