r - RColorbrewer没有改变geom_bar上的绘图颜色 - R

Question

我正在绘制一个图，其中我的数据集是一个简单的数字列，

count1 -> c(10,10,10,10,9,8,6,4,4,3,3,3) 

对于 y 轴，并且只是 y 轴的房间号列表。由于房间号无关紧要，数据的排列方式使 count1 的最大值位于左侧。我正在尝试使用一个调色板，它会根据条形的数量为条形上色，即 10 比 8 更重要，比 4 更重要，等等。

我已将列设置为.numeric(count1)，并尝试了一些方法。RColorbrewer 已加载，我只是得到一些随机的、难看的颜色，表明 RColorbrewer 根本没有激活。

这是我的情节代码，也许有人能找到我的错误？我想房间号码（x 轴）的数据类型应该无关紧要。

ggplot(fumeNumber3, aes(x = reorder(Location, -count1), y = count1)) + 
        theme(axis.text.x = element_text(angle = 85, hjust = 1)) +
        geom_bar(stat = "identity", fill = (fumeNumber3$count1)) +
        labs(x = "Lab Location", y = "Number of Fume Hoods in lab") +
         scale_fill_brewer(palette = "Blues")

标签： rggplot2geom-baraesthetics