¿Cambiar la longitud de las cargas (flechas) en el diagrama de PCA usando ggplot2 / ggfortify?

He estado luchando para reescalar la longitud de las cargas (flechas) en un PCA ggplot2 / ggfortify. He buscado una respuesta extensa a esto, y la única información que he encontrado es codificar nuevas funciones biplot o referirme a otros ...