OFFSET
1,5
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
With[{nn=40}, Module[{fibs=Fibonacci[Range[3, nn]], non, len}, non= Complement[ Range[ nn], fibs]; len= Min[ Length[ fibs], Length[ non]]; #[[1]]-#[[2]]&/@ Thread[{ Take [fibs, len], Take[non, len]}]]] (* Harvey P. Dale, Jan 09 2017 *)
CROSSREFS
KEYWORD
sign
AUTHOR
STATUS
approved