%I #6 Oct 15 2014 14:17:29
%S 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,
%T 51,63,71,76,79,81,82,83,102,115,123,128,131,133,134,135,165,186,199,
%U 207,212,215,217,218,219,267,301,322,335,343,348,351,353,354
%N Ordered nonnegative differences 4*f-g, where f and g are positive Fibonacci numbers (A000045).
%t (See A191850.)
%t Select[Union[4*First[#]-Last[#]&/@Tuples[Fibonacci[Range[20]],2]],#>=0&] (* _Harvey P. Dale_, Oct 15 2014 *)
%Y Cf. A191850, A191851, A191853.
%K nonn
%O 1,3
%A _Clark Kimberling_, Jun 17 2011