A259627 List of numbers L - 1, L, and L+1, where L = A000032, the Lucas numbers, sorted into increasing order and duplicates removed.

0, 1, 2, 3, 4, 5, 6, 7, 8, 10, 11, 12, 17, 18, 19, 28, 29, 30, 46, 47, 48, 75, 76, 77, 122, 123, 124, 198, 199, 200, 321, 322, 323, 520, 521, 522, 842, 843, 844, 1363, 1364, 1365, 2206, 2207, 2208, 3570, 3571, 3572, 5777, 5778, 5779, 9348, 9349, 9350, 15126

Offset

1,3

Links

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

Formula

G.f.: -((x (1 + x) (1 + x^2) (1 + 2 x + 3 x^2 + 2 x^3 + 2 x^4 + 2 x^5 +

2 x^6))/((1 + x + x^2) (-1 + x^3 + x^6)))

Mathematica

Union[# - 1, #, # + 1] &[LucasL[Range[50]]]

Crossrefs

Cf. A000032, A258085, A259623-A259626.

Sequence in context: A028826 A254099 A350425 * A250475 A131565 A039218

Adjacent sequences: A259624 A259625 A259626 * A259628 A259629 A259630

Keyword

nonn,easy

Author

Clark Kimberling and Peter J. C. Moses, Jul 01 2015

Status

approved