A272635 Numbers that are not a sum or a difference of two Fibonacci numbers.

17, 25, 27, 28, 30, 38, 40, 41, 43, 44, 45, 46, 48, 49, 51, 59, 61, 62, 64, 65, 66, 67, 69, 70, 71, 72, 73, 74, 75, 77, 78, 79, 80, 82, 83, 85, 93, 95, 96, 98, 99, 100, 101, 103, 104, 105, 106, 107, 108, 109, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122

Offset: 1

Author

Altug Alkan, May 04 2016

Keywords

• nonn
• easy

Comments

This sequence is the complement of the union of A007298 and A084176.

Links

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

Crossrefs

Cf. A000045, A007298, A084176, A105448, A105449.

Programs

Maple

N:= 30: # to get all terms < A000045(N+1) - A000045(N-4)
fibs:= [seq(combinat:-fibonacci(i),i=1..N)]:
R:= {seq(seq(fibs[i]-fibs[j],j=1..i-1),i=1..N), seq(seq(fibs[i]+fibs[j],j=1..i),i=1..N)}:
A:= {$1..fibs[-1]+fibs[-2]-fibs[-5]-1} minus R:
sort(convert(A,list)); # Robert Israel, May 04 2016