OFFSET
1,4
COMMENTS
Conjecture: every positive integers occurs infinitely many times.
MATHEMATICA
r = (1 + Sqrt[5])/2; f[n_] := Fibonacci[n]; nr = 300; nc = 200;
t[n_, k_] := k*f[n - 1] + Floor[k*r*f[n]]; (* A128440 *)
u = Sort[Flatten[Table[t[k, n], {k, 1, nr}, {n, 1, nc}]]];
Table[Count[u, n], {n, 1, nr}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Nov 11 2022
STATUS
approved