|
%I #6 Mar 05 2014 11:06:46
%S 0,1,2,3,4,5,6,7,8,9,11,13,15,17,18,19,21,24,28,29,30,32,34,39,45,47,
%T 49,51,53,55,63,73,76,79,83,85,87,89,102,118,123,128,134,138,140,142,
%U 144,165,191,199,207,217,223,227,229,231,233,267,309,322,335
%N Ordered sequence of nonnegative differences f-2*g, where f and g are positive Fibonacci numbers (A000045).
%t (See A191838.)
%t Union[Select[First[#]-2Last[#]&/@Tuples[Fibonacci[Range[20]],2],#>=0&]] (* _Harvey P. Dale_, Mar 05 2014 *)
%Y Cf. A191838, A191840, A191841.
%K nonn
%O 1,3
%A _Clark Kimberling_, Jun 17 2011
|
