如何在以下方框图中分隔geom_text插入的文本注释？
data(mtcars)
ggplot(data = mtcars, aes(as.factor(vs), mpg, color = am )) +
facet_wrap(~gear) +
geom_boxplot() +
geom_text(data=mtcars, aes(x=0.7, y = 30, label=carb), parse=TRUE)
这只是一个例子，而不是我遇到的真正问题。在我的具体情况中，文本注释表示相应组中的观察量。它们来自聚合函数。 最后，我希望在示例中有方面的箱形图，每个相应的箱形图上方有相应的观测数量。