Approach 2 · (data1, aes(x = Var1, y = Freq, fill = Var1)) + · geom_bar(stat = "identity") + · geom_text(aes(label = Freq), vjust = 0).
確定! 回上一頁