OFFSET
1,2
COMMENTS
Grundman proved that this sequence is infinite by showing the F(120k-6) + F(8) + F(6) + F(4) is a term for all k >= 1, where F(k) is the k-th Fibonacci number.
She also proved that the only starts of runs of 5 consecutive Zeckendorf-Niven numbers are 1 and 2.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..216
Helen G. Grundman, Consecutive Zeckendorf-Niven and lazy-Fibonacci-Niven numbers, Fibonacci Quarterly, Vol. 45, No. 3 (2007), pp. 272-276.
EXAMPLE
MATHEMATICA
z[n_] := Length[DeleteCases[NestWhileList[# - Fibonacci[Floor[Log[Sqrt[5]*# + 3/2]/Log[GoldenRatio]]] &, n, # > 1 &], 0]]; aQ[n_] := Divisible[n, z[n]]; c = 0; k = 1; s = {}; v = Table[-1, {4}]; While[c < 32, If[aQ[k], v = Join[Rest[v], {k}]; If[AllTrue[Differences[v], # == 1 &], c++; AppendTo[s, k - 3]]]; k++]; s (* after Alonso del Arte at A007895 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Oct 07 2019
STATUS
approved