OFFSET
1,2
LINKS
FORMULA
MATHEMATICA
Table[GCD[n, m=1; While[Mod[m!, n]!=0, m++]; m], {n, 100}] (* Giorgos Kalogeropoulos, Jul 02 2021 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 01 2021
STATUS
approved