R中x軸上的多列

Question

我是R的新手，之前有一個類似於我的問題，但是並不能完全滿足我的需求。

我有一張桌子，如下所示：

我希望為每個指標在X軸上相互繪制“ Value,和“ Threshold ，因此，有效地，我將在X軸上繪制三對圖。 我試圖為此使用reshape2和ggplot2 ，如下所示：

library(reshape2)
df <- melt(msi, id.vars="Average Metric Value (Abbr)")
# I get an error message, but the output seems ok.

library(ggplot2)
ggplot(df, aes(x="Average Metric Value (Abbr)", y=value, fill=variable)) + geom_bar(stat='identity', position='dodge')

輸出圖如下：

我確定以后可以確定如何分離三對中的每對，但是如您所見，我沒有沿x軸的三對中的每對的度量標准名稱，因此我錯過了第一對“值”欄，大概是因為它等於第二個，並且我只繪制了唯一的值。

如何解決該問題，並將每個指標的名稱放在每對值下面？

Answer 1

我們可以通過將其放置在aes_string或對那些名稱中帶有空格的列使用aes backquotes來做到這一點

library(dplyr)
library(tidyr)

gather(msi, variable, value, Value:Threshold) %>%
        ggplot(., aes(x= `Average Metric Value (Abbr)`, 
                      y=value,
                      fill=variable)) +
            geom_bar(stat='identity', position='dodge')