Question

您好我已经使用包中给出的示例制作了一个ggbiplot。我想知道是否可以删除灰色背景。

library(ggbiplot)

data(wine)

wine.pca <- prcomp(wine, scale. = TRUE)

print(ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE))

我已经研究了这里给出的函数

https://github.com/vqv/ggbiplot/blob/master/R/ggbiplot.r

但据我所知，这些参数都没有改变背景。

我对R没有经验，但如果某人有葡萄酒示例的解决方案，我相信我可以推断出我自己的数据。

非常感谢！

Answer 1

这样的东西？

p <- ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE) + theme_bw()
print(p)

Answer 2

有多种选择，但所有选项都包括更改＆＃34;主题＆＃34;不知何故。它与biplot没有任何关系，与ggplot本身有关。

首先，只更改背景：

+ theme(panel.background = element_blank())

如果你想删除网格线：

+ theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())

其他选项在？主题

中

其次，您可以更改总主题，例如：

+ theme_bw()  #black and white theme, as previously suggested
+ theme_classic(à  # classic theme

当然，你可以将两者结合起来。

您可以在此处找到更多信息： http://felixfan.github.io/rstudy/2013/11/27/ggplot2-remove-grid-background-margin/

Answer 3

不，这样的事情：

p <- ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE) 
p + theme_bw()

或

p + theme_classic()

或

p + theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())

依此类推。

ggbiplot删除背景

3 个答案: