A191989 Ordered sequence of nonnegative differences 2f-5g, where f and g are Lucas numbers (A000032 beginning at 1).

0, 1, 2, 3, 4, 7, 9, 11, 16, 17, 18, 21, 23, 29, 31, 38, 39, 43, 47, 53, 59, 62, 74, 76, 79, 89, 97, 101, 117, 123, 132, 137, 147, 156, 163, 191, 199, 211, 226, 231, 241, 253, 264, 308, 322, 343, 363, 378, 383, 393, 409, 427, 499, 521, 554, 589, 609, 624

Offset

1,3

Links

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

Mathematica

(See A191988.)
Join[{0}, Take[Union[Select[2*First[#]-5*Last[#]&/@Tuples[LucasL[ Range[40]], {2}], Positive]], 70]] (* Harvey P. Dale, Jun 22 2011 *)

Crossrefs

Cf. A191988, A191990, A191991.

Sequence in context: A348443 A023546 A236337 * A084913 A270839 A117450

Adjacent sequences: A191986 A191987 A191988 * A191990 A191991 A191992

Keyword

nonn

Author

Clark Kimberling, Jun 20 2011

Status

approved