OFFSET
1,2
COMMENTS
Greedy inverse of A005350.
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
Michael De Vlieger, Log log scatterplot of a(n), n = 1..2^20.
MAPLE
MATHEMATICA
r = 0; a[1] = a[2] = a[3] = 1; a[n_] := a[n] = a[a[n - 1]] + a[n - a[n - 1]]; Reap[Do[If[a[n] > r, Sow[n]; r = a[n]], {n, 155}]][[-1, 1]] (* Michael De Vlieger, Mar 27 2024, after Jean-François Alcover at A005350 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
R. J. Mathar, Mar 27 2024
STATUS
approved