A191844 Ordered nonnegative differences 3*f-g, where f and g are positive Fibonacci numbers (A000045).
0, 1, 2, 3, 4, 5, 6, 7, 8, 10, 11, 12, 13, 14, 16, 18, 19, 21, 22, 23, 26, 29, 31, 34, 36, 37, 38, 42, 47, 50, 55, 58, 60, 61, 62, 68, 76, 81, 89, 94, 97, 99, 100, 101, 110, 123, 131, 144, 152, 157, 160, 162, 163, 164, 178, 199, 212, 233, 246, 254, 259, 262
Offset: 1
Keywords
Programs
-
Mathematica
(See A191842.) Union[Select[3#[[1]]-#[[2]]&/@Tuples[Fibonacci[Range[20]],2],#>=0&]] (* Harvey P. Dale, Jul 29 2013 *)