Question

我不必提及我是新手，我的问题有太多解决方案。我尝试了大约12个不同版本但无法解决它：给出的例子接近我想要生成的我想要的情节。我从2013年开始超过了给定的脚本，因此我不完全理解如何以我想要的方式更改它：

在右下角绘制1的传说，没有标题，透明背景，而不是1和2标签“城市”和“非城市”。我知道“legend.position =”none“ “删除所有传说，但无法找到看起来至少接近this的解决方案。仍然不是情节，不透明，有标题。
不幸的是，在这个过程中，点变成了正方形，我不知道为什么。我没有改变geom_point。
我想改变的另一个缺陷是删除中心情节的顶线。但是如何？
最后但并非最不重要的是我不确定函数geom.mooth（method = lm）是否确实反映了回归线+置信区间，因为描述说它添加了一个条件均值，即afaIk，而不是相同。我不需要担心吗？

编辑：较短的版本积1中的3个合并图：

library(ggplot2)
library(gridExtra)

set.seed(42)
DF <- data.frame(x=rnorm(100,mean=c(1,5)),y=rlnorm(100,meanlog=c(8,6)),group=1:2)

p1 <- ggplot(DF,aes(x=x,y=y,colour=factor(group))) + geom_point(shape=16) +
  scale_x_continuous(expand=c(0.02,0)) +
  scale_y_continuous(expand=c(0.02,0)) +
  geom_rug() +
  geom_smooth(method=lm,alpha=0.3) +
  theme_bw()+
  theme(legend.position=c(0.9,0.09),
        legend.title=element_blank(),
        plot.margin=unit(c(0,0,0,0),
        "points"))

感谢您的任何建议，我正在研究这个主题，因为2周后，尽管我认为我正在学习心理学，但我学到了很多......但在短时间内取得成功还不够。：/

如何在合并的图中使单个图例的bg透明？

0 个答案: