颜色取自链接上的图片
https://news.cgtn.com/news/2020-05-08/Beijing-Winter-Olympics-color-system-and-dynamic-graphics-released-QkvJxPsfBu.../index.html
image.png
总共13个颜色
cols<-c("#af2934","#ffe327","#2f4e87","#b0b9b8","#f0eedf",
"#aed4e9...霞光红","迎春黄","天霁蓝","长城灰",
"瑞雪白","天青","梅红","竹绿","冰蓝",
"吉柿","墨","金","银")
用颜色代码做一个柱形图...迎春黄","天霁蓝","长城灰",
"瑞雪白","天青","梅红","竹绿","冰蓝",
"吉柿","墨","金","银")
library(ggplot2...colors=cols,
labels=chineseCols)
ggplot(data=dat,aes(x=x,y=y))+
geom_col