OFFSET
1,4
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 1..817
F. Smarandache, Only Problems, Not Solutions!.
MATHEMATICA
f[n_] := Block[{k = 1}, While[Mod[k!!, n] > 0, k++]; k!!/n]; Array[f, 35] (* Robert G. Wilson v, Feb 18 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
R. Muller
EXTENSIONS
a(10) corrected by Sean A. Irvine, Feb 18 2018
STATUS
approved