A191876 Ordered sequence of nonnegative differences 3*f-4*g, where f and g are positive Fibonacci numbers (A000045).

1, 2, 3, 4, 5, 7, 11, 12, 16, 18, 19, 20, 27, 29, 31, 35, 43, 47, 50, 51, 55, 59, 70, 76, 81, 82, 90, 94, 98, 113, 123, 131, 133, 145, 153, 157, 161, 183, 199, 212, 215, 235, 247, 255, 259, 263, 296, 322, 343, 348, 380, 400, 412, 420, 424, 428, 479, 521

Offset

1,2

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

N:= 10^6: # for terms <= N
S:= {}:
for n from 3 do
  v:= 3*combinat:-fibonacci(n) - 4*combinat:-fibonacci(n-1);
  if v > N then break fi;
  S:= S union {v};
  for j from n-2 to 1 by -1 do
    v:= 3*combinat:-fibonacci(n)- 4*combinat:-fibonacci(j);
    if v > N then break fi;
    S:= S union {v};
od od:
sort(convert(S, list)); # Robert Israel, Jan 05 2021

Mathematica

(See A191875.)

Crossrefs

Cf. A000045, A191875, A191877, A191878.

Sequence in context: A180348 A001729 A001087 * A234719 A055464 A139316

Adjacent sequences: A191873 A191874 A191875 * A191877 A191878 A191879

Keyword

nonn

Author

Clark Kimberling, Jun 18 2011

Extensions

0 removed by Robert Israel, Jan 05 2021

Status

approved