ggplot geom_bar（）和基本barplot

Question

我想使用ggplot2::geom_bar()重现以下基本barplot。

玩具数据：

dat <- data.frame("Player" = rep(c("P1", "P2", "P3", "P4", "P5"), times = 2),
                  "Score" = runif(n = 10, 0, 10) * 3)

基本barplot：变量Player被复制

barplot(height = dat$Score, names.arg = dat$Player)

geom_bar：变量Player被分组

ggplot(dat) +
  geom_bar(aes(x = Player, y = Score), stat = "identity")

如何使用geom_bar()来使变量重复（而不是分组）？我想念什么？