基于空白VHS盒式磁帶包裝設(shè)計的調(diào)色板,喜歡的小伙伴可以關(guān)注我的公眾號R語言數(shù)據(jù)分析指南,持續(xù)分享更多優(yōu)質(zhì)資源
devtools::install_github('cj-holmes/vhs')
library(vhs)
library(tidyverse)

view_all_vhs_palettes()

ggplot(diamonds, aes(color, fill=cut))+
geom_bar(col=1)+
scale_fill_manual(values = vhs("cvs"))+
scale_y_continuous(expand = c(0, 0))+
theme_bw()+
theme(panel.grid = element_blank(),
panel.border = element_blank())
