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 A071678 #5 Oct 15 2013 22:31:23
%S A071678 1,2,6,6,3,9,45,1152,189,189,99,594,594,198,99,198,99,594,99,378378,
%T A071678 45045,99,396,30294,2279277,14256,3267,1089,6336,9702,20196,6534,396,
%U A071678 11088,20117097,99,99,6318675,594,21978,1089,297,2178,594,1683,1485
%N A071678 GCD of n! and the reverse of n!.
%F A071678 a(n)=A055483[n! ]
%e A071678 n=7, a(7)=GCD[5040,405]=45.
%t A071678 nd[x_, y_] := 10*x+y tn[x_] := Fold[nd, 0, x] ed[x_] := IntegerDigits[x] red[x_] := Reverse[IntegerDigits[x]] Table[GCD[w!, tn[red[w! ]]], {w, 1, 128}]
%Y A071678 Cf. A055483.
%K A071678 base,nonn
%O A071678 1,2
%A A071678 _Labos Elemer_, May 31 2002