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

0, 1, 2, 3, 4, 6, 7, 8, 11, 12, 14, 17, 18, 22, 23, 26, 29, 32, 34, 36, 43, 46, 47, 52, 57, 58, 69, 76, 78, 81, 87, 91, 94, 112, 123, 124, 133, 136, 142, 148, 152, 181, 199, 202, 214, 223, 226, 232, 239, 246, 293, 322, 326, 347, 359, 368, 371, 377, 387, 398

Offset: 1

Author

Clark Kimberling, Jun 21 2011

Keywords

• nonn

Crossrefs

Cf. A192045.

Programs

Mathematica

(See A192045.)
Join[{0},With[{nn=60},Take[Select[5#[[1]]-3#[[2]]&/@Tuples[LucasL[ Range[ nn]],2],#>=0&]//Union,nn]]] (* Harvey P. Dale, Jul 08 2017 *)