Aliases: rygbp
Keywords:
### ** Examples my_red <- "10R 4/8" rygbp(my_red)
[1] "2.5YR 4/8"
plot_mnsl(c(my_red, rygbp(my_red, 2), rygbp(my_red, 4)))