使用以下代码,我在每个构面上都获取了文本,但该文本是叠加的:“ X1”和“ X2”叠加在每个构面上。 我的代码中的问题出在哪里?
R代码:
new_df <- data.frame(f = as.factor(rep(1:2,15)),x = rnorm(30),y = runif(30))
g <- ggplot(data = new_df,aes(x = x,y = y)) + geom_point()
g <- g + facet_grid(. ~ f)
g
label_graph <- data.frame(label = c("X1","X2"))
g <- g + geom_text(data = label_graph,mapping = aes(x = Inf,y = -Inf,label = label),hjust = 1.1,vjust = -1.1)
g