ggbiplot - изменить значение осей

Question

Текущий ggbiplot (код ниже) показывает значения оси X от -5 до 5 и ось Y от -4 до 4. Как я могу изменить его, чтобы значения оси X были от -6 до 6, а ось Y от -6 до 6??

Благодарю.

Код:

library(devtools)
install_github("ggbiplot", "vqv")
library(ggbiplot)
data(wine)

ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, group=wine.class,
         varname.size = 8, labels.size=10, 
         ellipse = TRUE, circle = TRUE) +
  scale_color_discrete(name = '') +  
  geom_point(aes(colour=wine.class), size = 8) +
  theme(legend.direction ='horizontal', 
        legend.position = 'top')

Answer 1

Одна возможность: использовать xlim а также ylim fuctnions

library(ggbiplot)
data(wine)
wine.pca <- prcomp(wine, scale. = TRUE)
p <-
ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, group=wine.class,
         varname.size = 8, labels.size=10,
         ellipse = TRUE, circle = TRUE) +
  scale_color_discrete(name = '') +
  geom_point(aes(colour=wine.class), size = 8) +
  theme(legend.direction ='horizontal',
        legend.position = 'top')
p <- p + xlim(-6, 6) + ylim(-6, 6)
print(p)