R language draws a histogram with complete colors

library(tidyverse)

ggplot(data = diamonds) + 
  geom_bar(mapping = aes(x = cut,fill = clarity))+scale_fill_brewer(palette="Set1")

insert image description here

scale_fill_brewer(palette="Set2")

insert image description here

scale_fill_brewer(palette="Set3")

insert image description here

scale_fill_brewer(palette="GnBu")

insert image description here

scale_fill_brewer(palette="Pastel1")

insert image description here

scale_fill_brewer(palette="Pastel2")

insert image description here

scale_fill_brewer(palette="Paired")

insert image description here

scale_fill_brewer(palette="Dark2")

insert image description here

scale_fill_brewer(palette="Accent")

insert image description here

scale_fill_brewer(palette="Spectral")

insert image description here

scale_fill_brewer(palette="RdYlGn")

insert image description here

scale_fill_brewer(palette="RdYlBu")

insert image description here

scale_fill_brewer(palette="RdGy")

insert image description here

scale_fill_brewer(palette="RdBu")

insert image description here

scale_fill_brewer(palette="PuOr")

insert image description here

scale_fill_brewer(palette="PRGn")

insert image description here

scale_fill_brewer(palette="PiYG")

insert image description here

scale_fill_brewer(palette="BrBG")

insert image description here

scale_fill_brewer(palette="YlOrRd")

insert image description here

scale_fill_brewer(palette="YlOrBr")

insert image description here

scale_fill_brewer(palette="YlGnBu")

insert image description here

scale_fill_brewer(palette="YlGn")

insert image description here

scale_fill_brewer(palette="Reds")

insert image description here

scale_fill_brewer(palette="RdPu")

insert image description here

scale_fill_brewer(palette="Purples")

insert image description here

scale_fill_brewer(palette="PuRd")

insert image description here

scale_fill_brewer(palette="PuBuGn")

insert image description here

scale_fill_brewer(palette="PuBu")

insert image description here

scale_fill_brewer(palette="OrRd")

insert image description here

scale_fill_brewer(palette="Oranges")

insert image description here

scale_fill_brewer(palette="Greys")

insert image description here

scale_fill_brewer(palette="Greens")

insert image description here

scale_fill_brewer(palette="GnBu")

insert image description here

scale_fill_brewer(palette="BuPu")

insert image description here

scale_fill_brewer(palette="BuGn")

insert image description here

scale_fill_brewer(palette="Blues")

insert image description here
Development tools: RStudio 2023.06.1 Build 524