мутировать несколько столбцов, сгенерированных с помощью одной функции?

Question

Предположим, у меня есть кадр данных с любым количеством переменных плюс 3 переменные для цвета RGB. Я хочу преобразовать цвет RGB в LAB и добавить их в фрейм данных. Вот уродливый код:

df <- data.frame(id=c(1:10),red=runif(10),green=runif(10),blue=runif(10)) 
df <- cbind(df,convertColor(subset(df,select=c("red","green","blue")),from="sRGB",to="Lab")) 

Было бы здорово, если бы мутировать может генерировать несколько переменных с помощью одного вызова; например (псевдокод):

df <- data.frame(id=c(1:10),red=runif(10),green=runif(10),blue=runif(10)) 
df <- df %>% mutate(list("L","a","b") = convertColor(cbind(red,green,blue),from="sRGB",to="Lab")) 

Есть ли аналогичный подход с использованием dplyr?

Answer 1

Если вы хотите, чтобы некоторые синтаксического сахара, вы можете использовать этот код:

df %>% 
    select(red,green,blue) %>% 
    convertColor(from="sRGB",to="Lab") %>% 
    cbind(df,.) 

Answer 2

Если вы хотите, чтобы избежать ненужного копирования данных, это data.table синтаксиса, чтобы добавить новые столбцы путем изменения данных на месте:

library(data.table) 
dt = as.data.table(df) 

dt[, c('L', 'a', 'b') := as.data.table(convertColor(.SD, from = 'sRGB', to = 'Lab')) 
    , .SDcols = c('red', 'green', 'blue')]