r - 更改 geom_waffle 的方向

Question

我试图让我的华夫饼情节前后颠倒。任何想法表示赞赏。

这是我所拥有的

parts <-  c("Incorrect", "Correct")
vals <- c(

15, 14)
    data <-  data.frame (parts, vals)
    
library(ggplot2)
library(waffle)
    
    ggplot(data, aes(fill = parts, values = vals)) +
      geom_waffle(n_rows = 10, flip = T, size = 1, colour = "white", 
                   radius = unit(5, "pt"), make_proportional = F) +
  theme_void() +
  coord_equal() +
  scale_fill_manual(values = c("navy", "grey"))
  

但我希望它让海军从左到右走，而在右边尽头的空块。像这样（但如果可能的话，用正确的方式向上传说，但无论如何可能会删除）：

感谢你的帮助！