您好我已经使用包中给出的示例制作了一个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没有经验,但如果某人有葡萄酒示例的解决方案,我相信我可以推断出我自己的数据。
非常感谢!
答案 0 :(得分:1)
这样的东西?
p <- ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE) + theme_bw()
print(p)
答案 1 :(得分:0)
有多种选择,但所有选项都包括更改&#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/
答案 2 :(得分:0)
不,这样的事情:
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())
依此类推。