r - 使 facet_wrap 标签覆盖 ggplot 中的所有相关面板

Question

我想知道，有没有办法让 facet_wraps() 标签覆盖 ggplot 中的所有相关列。这是一个例子来说明我的意思：

library(tidyverse)

p <- ggplot(mtcars, aes(wt, mpg)) + geom_point()
p + facet_wrap(~ vs+cyl, labeller = label_value)

如您所见，在上图中，标签0和1分别出现在所有列的上方。我想修改它，使第一行列上方只有一个0 ，第二行列上方只有一个1。