나는 같은 문제가 있었다. 나는 8 개의 수업이 필요했다. 최소한 카테고리를 가장 눈에 띄게 만들 수있는 해결 방법을 만들었습니다. 기본적으로 색상 양조자가 만든 각 색상의 채도 값 사이의 거리를 늘립니다. 이를 통해 흑백 인쇄에서 가장 눈에 띄는 카테고리를 얻을 수 있습니다. 아래에서 볼 수 있듯이 두 플롯은 약간만 변경되지만 bw에서는 차이가 있습니다.
스크립트를 사용하려면 R을 알아야합니다.
library("ggplot2")
library("colorspace")
library("RColorBrewer")
# display all color scales with n=8
display.brewer.all(n = 8,type = "div")
# choose a brewer
brewer.pal(8,"Spectral")
# transform palette to HSV values
(palette.HSV<-as(hex2RGB(brewer.pal(8,"Spectral")), "HSV"))
# plot
plot(1:8,1:8,pch=21,bg=hex(palette.HSV),col=hex(palette.HSV),cex=5)
# sort and get indices of HSV values
sort(palette.HSV@coords[,2],index.return=TRUE)
# calculate steps for distance
9/8 # 8 classes until 0.9 saturation
# change accordingly
palette.HSV@coords[1,2]<-0.7875 # swapped with second
palette.HSV@coords[2,2]<-0.675
palette.HSV@coords[3,2]<-0.5625
palette.HSV@coords[4,2]<-0.3375
palette.HSV@coords[5,2]<-0.225
palette.HSV@coords[6,2]<-0.1125
palette.HSV@coords[7,2]<-0.45
palette.HSV@coords[8,2]<-0.9
plot(1:8,1:8,pch=21,bg=hex(palette.HSV),col=hex(palette.HSV),cex=5)
# save your costum colorscale
my.scale<-hex(palette.HSV)
변경된 값
원래 값
편집 : 밝기를 변경하려면 (아래 설명 참조) 다음 코드를 사용하십시오.
# change brightness accordingly (reverse order)
palette.HSV@coords[1,3]<- 0.225
palette.HSV@coords[2,3]<-0.4
palette.HSV@coords[3,3]<-0.5625
palette.HSV@coords[4,3]<-0.9
palette.HSV@coords[5,3]<-0.7875
palette.HSV@coords[6,3]<-0.675
palette.HSV@coords[7,3]<-0.3
palette.HSV@coords[8,3]<-0.1125