A097905 Triangle where a(m,n) = largest divisor of m! coprime to n.

1, 2, 1, 6, 3, 2, 24, 3, 8, 3, 120, 15, 40, 15, 24, 720, 45, 80, 45, 144, 5, 5040, 315, 560, 315, 1008, 35, 720, 40320, 315, 4480, 315, 8064, 35, 5760, 315, 362880, 2835, 4480, 2835, 72576, 35, 51840, 2835, 4480, 3628800, 14175, 44800, 14175, 145152, 175

Offset

1,2

Comments

Right edge of triangle is sequence A095996.

Links

Table of n, a(n) for n=1..51.

Example

a(6,3) = 80 because 80 is largest divisor of 720 which is coprime to 3.

Maple

seq(seq(denom(m^n/n!), m=1..n), n=1..11); # Vladeta Jovovic, May 03 2005

Mathematica

Flatten[Table[Table[Select[Divisors[m! ], GCD[ #, n]==1&][[ -1]], {n, 1, m}], {m, 1, 10}]] (* Stefan Steinerberger, Nov 09 2007 *)

Crossrefs

Cf. A095996.

Sequence in context: A120435 A125901 A094307 * A094310 A165908 A121281

Adjacent sequences: A097902 A097903 A097904 * A097906 A097907 A097908

Keyword

nonn,tabl

Author

Leroy Quet, Sep 04 2004, Apr 10 2007

Extensions

More terms from Stefan Steinerberger, Nov 09 2007

Status

approved