A071678 GCD of n! and the reverse of n!.

1, 2, 6, 6, 3, 9, 45, 1152, 189, 189, 99, 594, 594, 198, 99, 198, 99, 594, 99, 378378, 45045, 99, 396, 30294, 2279277, 14256, 3267, 1089, 6336, 9702, 20196, 6534, 396, 11088, 20117097, 99, 99, 6318675, 594, 21978, 1089, 297, 2178, 594, 1683, 1485

Offset: 1

Author

Labos Elemer, May 31 2002

Keywords

• base
• nonn

Examples

			n=7, a(7)=GCD[5040,405]=45.
		

Crossrefs

Cf. A055483.

Programs

Mathematica

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}]

Formula

a(n)=A055483[n! ]