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,3

Links

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

Mathematica

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

Crossrefs

Cf. A191850, A191851, A191853.

Sequence in context: A328242 A380550 A294295 * A136416 A072497 A300064

Adjacent sequences: A191849 A191850 A191851 * A191853 A191854 A191855

Keyword

nonn

Author

Clark Kimberling, Jun 17 2011

Status

approved