OFFSET
1,2
LINKS
Eric Weisstein's World of Mathematics, Farey Sequence.
MATHEMATICA
Farey[n_] := Union[ Flatten[ Join[{0}, Table[a/b, {b, n}, {a, b}]]]]; Table[LCM @@ Range[n] Plus @@ Farey[n], {n, 26}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v and Clark Kimberling, Apr 06 2004
STATUS
approved