Compute the greatest common divisor (GCD) and least common multiple (LCM) of a collection of polynomials and polylists.

# S3 method for class 'polylist'
GCD(...)
# S3 method for class 'polynomial'
GCD(...)
# S3 method for class 'polylist'
LCM(...)
# S3 method for class 'polynomial'
LCM(...)

Arguments

...

a list of objects of class polynomial or polylist.

Examples

pl <- polylist(poly.from.roots(-1),
               poly.from.roots(c(-1, -1)),
               poly.from.roots(1))
GCD(pl)
#> 1 
GCD(pl[-3])
#> 1 + x 
LCM(pl)
#> -1 - x + x^2 + x^3 
LCM(pl, pl, pl[[2]])
#> -1 - x + x^2 + x^3