OFFSET
1,6
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..16384
Antti Karttunen, Data supplement: n, a(n) computed for n = 1..65537
MATHEMATICA
Table[n/GCD[n, m=1; While[Mod[m!, n]!=0, m++]; m], {n, 100}] (* Giorgos Kalogeropoulos, Jul 03 2021 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 01 2021
STATUS
approved