RosettaCodeData/Task/Sylvesters-sequence/Mathematica/sylvesters-sequence.math

3 lines
70 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Rest[Nest[Append[#, (Times @@ #) + 1] &, {1}, 10]]
N[Total[1/%], 250]