OFFSET
1,2
REFERENCES
F. Smarandache, "Some problems in number theory", Student Conference, University of Craiova, Department of Mathematics, 1979.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..2000
Anonymous, Smarandache k-factorial
EXAMPLE
a(16) = 8 because 8!!! = 8*(8 - 3)*(8 - 6) = 8*5*2 which is divisible by 16 and 8 is the smallest integer with this property.
MATHEMATICA
f[n_] := Product[k, {k, n, 1, -3}]; a[n_] := Module[{k = 1}, While[! Divisible[ f[k], n], k++]; k]; Array[a, 100] (* Amiram Eldar, Dec 08 2018 *)
With[{tbl=Table[Times@@Range[k, 1, -3], {k, 100}]}, Table[Position[tbl, _?(Divisible[ #, n]&), 1, 1], {n, 70}]]//Flatten (* Harvey P. Dale, Feb 11 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Mike Antholy (mikeantholy(AT)yahoo.ca), Aug 31 2001
EXTENSIONS
Offset changed and more terms by Amiram Eldar, Dec 08 2018
STATUS
approved