OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
t(4) = 10 and the first factorial divisible by 10 is 5!, so a(4) = 5.
MATHEMATICA
nn=80; With[{f=Range[nn]!, trs=Accumulate[Range[nn]]}, Flatten[ Table[ Position[f, _?(Divisible[#, trs[[n]]]&), {1}, 1], {n, nn}]]] (* Harvey P. Dale, Nov 18 2013 *)
PROG
(PARI) t(n)=n*(n+1)/2;
for (n=1, 50, c=1; while (c!%t(n)!=0, c++); print1(c", "));
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon Perry, Jul 23 2003
EXTENSIONS
Extended by Ray Chandler, Jun 06 2008
STATUS
approved