This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A076929 #8 Jan 09 2016 17:36:29
%S A076929 1,1,1,2,2,6,6,24,72,360,360,2160,2160,15120,75600,604800,604800,
%T A076929 5443200,5443200,54432000,381024000,4191264000,4191264000,50295168000,
%U A076929 251475840000,3269185920000,29422673280000,411917425920000
%N A076929 a(1) = 1, a(n+1)= a(n)*(n+1) divided by the smallest prime divisor of n+1.
%p A076929 a[1] := 1: for n from 2 to 100 do a[n] := n*a[n-1]/ifactors(n)[2][1][1]: od:seq(a[j],j=1..100);
%t A076929 nxt[{n_,a_}]:={n+1,(a(n+1))/FactorInteger[n+1][[1,1]]}; Transpose[ NestList[ nxt,{1,1},30]][[2]] (* _Harvey P. Dale_, Jan 09 2016 *)
%Y A076929 Cf. A076928.
%K A076929 nonn
%O A076929 1,4
%A A076929 _Amarnath Murthy_, Oct 18 2002
%E A076929 More terms from _Sascha Kurz_, Jan 21 2003