如何从stats :: biplot和ggplot2 :: autoplot从ggfortify R包中生成的biplots获得相同的加载比例？

Question

来自stats::biplot ggplot2::autoplot包裹的ggfortify和R制作的双版图的加载比例是不同的。如何从stats::biplot ggplot2::autoplot包ggfortify和R生成的biplots获得相同的加载比例？

stats::biplot(prcomp(USArrests, scale = TRUE))

library(ggfortify)
ggplot2::autoplot(stats::prcomp(USArrests, scale=TRUE), label = TRUE, loadings.label = TRUE)