A191852 Ordered nonnegative differences 4*f-g, where f and g are positive Fibonacci numbers (A000045).

0, 1, 2, 3, 4, 5, 6, 7, 9, 10, 11, 12, 15, 17, 18, 19, 24, 27, 29, 30, 31, 39, 44, 47, 49, 50, 51, 63, 71, 76, 79, 81, 82, 83, 102, 115, 123, 128, 131, 133, 134, 135, 165, 186, 199, 207, 212, 215, 217, 218, 219, 267, 301, 322, 335, 343, 348, 351, 353, 354

Offset: 1

Author

Clark Kimberling, Jun 17 2011

Keywords

• nonn

Crossrefs

Cf. A191850, A191851, A191853.

Programs

Mathematica

(See A191850.)
Select[Union[4*First[#]-Last[#]&/@Tuples[Fibonacci[Range[20]],2]],#>=0&] (* Harvey P. Dale, Oct 15 2014 *)