WolframAlpha computational knowledge AI
Fold[Join[#1, #2 + #1/#2] &, {1}, Range[6]]