ggplot2添加图形美学时出现对象未找到错误

Question

我试图向现有的图形添加一个形状美学映射，但是收到了下面的错误。是否有其他方法来实现这个？如果从函数调用中删除shape=Port ，则一切正常。

p <- ggplot(data=w, aes(OAD,RtgValInt,color=dt,shape=Port)) +
    geom_jitter(size=3, alpha=0.75) +
     scale_colour_gradient(limits=c(min(w$dt), 
             max(w$dt)),
         low="#9999FF", high="#000066") +
     geom_point(data=data.frame(OAD=w$OAD[1], 
             RtgValInt=w$RtgValInt[1]), 
         color="red", size=3)
print(p)

Error in eval(expr, envir, enclos) : object 'Port' not found

数据框架w包含以下数据。

Date          Port    OAD         RtgValInt   dt
12/31/2010  Grp1    1.463771    1.833333    14974
12/31/2010  Grp2    1.193307    2.071429    14974
11/30/2010  Grp1    1.454115    1.833333    14943
11/30/2010  Grp2    1.127755    2.071429    14943
10/29/2010  Grp1    1.434965    2.000000    14911
10/29/2010  Grp2    1.055758    2.071429    14911
09/30/2010  Grp1    1.441773    2.000000    14882
09/30/2010  Grp2    1.077799    2.071429    14882

- user338714

---

请参考当添加不同数据层时，ggplot对象未找到错误以获取更多选项。 - Gregor Thomas

Answer 1

由于每个图层都会继承默认的aes映射，因此当您使用不同的数据集时，您需要在geom_point中将shape aes设置为null。

p <- ggplot(data=w, aes(OAD,RtgValInt,color=dt,shape=Port)) +
  geom_jitter(size=3, alpha=0.75) +
  scale_colour_gradient(limits=c(min(w$dt), 
      max(w$dt)),
    low="#9999FF", high="#000066") +
  geom_point(aes(shape=NULL), data=data.frame(OAD=w$OAD[1], 
      RtgValInt=w$RtgValInt[1]), 
    color="red", size=3)

- kohske

---

不要在整体绘图默认值中设置形状。 - hadley

иҝҷжҳҜеңЁдҪҝз”Ёggmap()еҲӣе»әзҡ„еӣҫиЎЁдёӯж·»еҠ geom_rectеұӮж—¶еҸ‘з”ҹзҡ„гҖӮ - krlmlr