OFFSET
1,2
EXAMPLE
For n=8:
8!=40320 is divisible by 9 with a quotient of 4480;
4480 is divisible by 10 with a quotient of 448;
448 is not divisible by 11, 12 or 13, but is divisible by 14 with a quotient of 32;
32 is not divisible by 15, but is divisible by 16 with a quotient of 2;
2 is the final residue of the sequence since 16 > 2, therefore a(8)=2.
MAPLE
A165899 := proc(n) local f, d; f := n! ; d := n+1 ; while f >= d do if f mod d = 0 then f := f/d ; end if; d := d+1 ; end do ; f ; end proc: seq(A165899(n), n=1..80) ; # R. J. Mathar, Jan 25 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Sergio Pimentel, Sep 29 2009
EXTENSIONS
Terms beyond a(15) from R. J. Mathar, Jan 25 2010
STATUS
approved