Conversion of `RGB` values into `HEX` values is easy with R:

```
    x <- c("165 239 210", "111 45 93")
    sapply(strsplit(x, " "), function(x)
    rgb(x[1], x[2], x[3], maxColorValue=255))
    #[1] "#A5EFD2" "#6F2D5D"

```

How can I convert CIELab values into RGB and HEX?

```
x <- c("20 0 0", "50 0 0")
[...code...]
#[1] "#303030" "#777777"

```