R 皮条客使用预定义颜色绘制条形图

我正在创建这样的条形图：

cyl.am <- ggplot(mtcars, aes(x = factor(cyl), fill = factor(am)))
cyl.am +
 geom_bar()

---

尝试使用

scale\u fill\u manual

代替：

cbbPalette <- c("#000000", "#E69F00")
cyl.am <- ggplot(mtcars, aes(x = factor(cyl), fill = factor(am)))

cyl.am +
  geom_bar() +
  scale_fill_manual(values = cbbPalette)

cbbPalette
Warning messages:
1: In if (!palette %in% unlist(brewer)) { :
 the condition has length > 1 and only the first element will be used
2: In pal_name(palette, type) : Unknown palette #000000#E69F00

cbbPalette <- c("#000000", "#E69F00")
cyl.am <- ggplot(mtcars, aes(x = factor(cyl), fill = factor(am)))

cyl.am +
  geom_bar() +
  scale_fill_manual(values = cbbPalette)