OFFSET
0,2
COMMENTS
Conjecture: a(n) > a(n-1) and a(n) ~= sqrt(5)*a(n-1).
Often, a(n) = 5*a(n-2) as when n is 2, 3, 4, 6, 7, 8, 10, 11, 12, 13, 15, 16, 17, 19, 20, 21, 22, 24, 25, 29, ..., . [Corrected by Jon E. Schoenfield, Apr 05 2020]
The first occurrence of k at an even index is 2*a(k).
EXAMPLE
MATHEMATICA
a[n_] := -1 + Length@ NestWhileList[# + #/FactorInteger[#][[-1, 1]] &, n, # != 2^IntegerExponent[#, 2] &]; k = 1; t[_] := 0; While[k < 1000001, b = a@k; If[t[b] == 0, t[b] = k; Print[{b, k}]]; k+=2]; t@# & /@ Range[0, 17]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ali Sada and Robert G. Wilson v, Feb 28 2020
STATUS
approved