將點添加到基於另一變量的箱線

Question

我對R相當陌生，並且很感激一些輸入。我爲每個波形（1-5）創建了一個最多4個盒形圖的情節。我現在想根據他們的ID在劇情上顯示符號以供他人回覆。例如，我想顯示id = 202（id也在數據「mydata」中）的響應。我搜索了高和低，並不知道如何去做。有什麼想法嗎？這裏是我的代碼（似乎沒有10聲譽我不能發佈我的形象）：

ggplot(aes(y=InnAttMeasure, x=interaction(IntType, wave)), data=mydata)+ 
geom_boxplot(aes(fill=factor(IntType)))+ 
stat_summary(fun.y="mean", geom="point", shape=23, size=3, fill="black") + 
scale_fill_brewer()+ 
xlab("Wave") + 
ylab("Innovation Attribute Measure (1-7)") + 
facet_grid(.~wave, scales="free", space="free") + 
coord_cartesian(ylim=c(0,7.5)) + 
scale_y_continuous(breaks=seq(0,7,1)) + 
scale_x_discrete(breaks=NULL) + 
theme(panel.grid.minor.y=element_blank(), 
panel.grid.major.y=element_blank()) 

Answer 1

這不是完全清楚你問什麼，但也許你可以建造使用的一個例子內置數據集。舉例來說，我認爲這可能是你追求的：

# First look at the mtcars dataset 
mtcars 

library(ggplot2) 

# Let's make a dataframe of just the Mercedes cars; lots of ways to do this. 
mercedes <- mtcars[grep("Merc", row.names(mtcars)), ] 

# Now plot a boxplot of mpg by cylinder and then overlay points geom_point() 
# of just the Mercedes dataframe 
ggplot(data = mtcars, aes(y = mpg, x = factor(cyl))) + 
    geom_boxplot() + 
    geom_point(data = mercedes, color = "blue", position = "jitter", size = 4)