Alterar o comprimento das cargas (setas) no gráfico PCA usando ggplot2 / ggfortify?

Tenho lutado para redimensionar o comprimento das cargas (setas) em um PCA ggplot2 / ggfortify. Procurei extensivamente por uma resposta a isso, e as únicas informações que encontrei codificam novas funções biplot ou referem-se a outros pacotes ...