Mínimo común múltiplo y máximo común divisor en R

Problema

Deseamos calcular el mínimo común múltiplo y el máximo común divisor de un vector en R.

Solución

Usamos el paquete numbers. Las funciones mLCM(x) y mGCD(x) computan el mínimo común múltiplo y el máximo común divisor de todos los números de un vector x de números enteros:

library(numbers)
    mGCD(c(4, 8, 12, 16, 20))
[1] 4
    mLCM(c(8,9,21))
[1] 504
    # Sequences
    mLCM(1:20)
[1] 232792560

Referencias

• stackoverflow
• GCD: GCD and LCM Integer Functions