|
| |
|
|
A071678
|
|
GCD of n! and the reverse of n!.
|
|
0
| |
|
|
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
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| a(n)=A055483[n! ]
|
|
|
EXAMPLE
| n=7, a(7)=GCD[5040,405]=45.
|
|
|
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}]
|
|
|
CROSSREFS
| Cf. A055483.
Sequence in context: A136696 A086358 A004152 * A141329 A110388 A007507
Adjacent sequences: A071675 A071676 A071677 * A071679 A071680 A071681
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), May 31 2002
|
| |
|
|
