错误：stat_bin需要以下缺失的美感：x

Question

我正在尝试绘制表示一对骰子滚动的直方图。

roll <- function() {
    die=1:6    
    ra<-sample(x=die,size=2,replace=T)
    sum(ra)
}

giz <- replicate(100, roll())

ggplot2::qplot(giz, binwidth=1)

但是我得到了错误：

  

stat_bin需要以下缺失的美感：x