Превращение кадра данных в именованный список

Question

У меня есть фрейм данных цветов и идентификаторов, и я хочу превратить их в список с цветами в качестве name и идентификатором в качестве value

colors <- data.frame(color = c('Gold', 'Green', 'Red'), id = c('1','2','3'))

это небольшая выборка фрейма данных, так как строк намного больше.

Я пытаюсь получить результаты, эквивалентные выводу, когда вы пишете:

colorlist <- list('Gold' = 1, 'Green' = 2, 'Red' = 3)

Answer 1

Попробуй это. Очень похоже на решение MKBakker. Я добавил as.integer(), поэтому результат, как вы описали:

colorlist <- as.list(as.integer(colors$id))
names(colorlist) <- colors$color

Answer 2

setNames(as.list(as.character(colors$id)), nm = colors$color)
$Gold
[1] "1"

$Green
[1] "2"

$Red
[1] "3"

Answer 3

с разделением:

colorlist = split(x=colors$id, f=colors$color)

Если уровни являются проблемой, просто превратите идентификатор в символ:

colorlist = split(x=as.character(colors$id), f=colors$color)

Answer 4

Попробуйте:

colors <- data.frame(color = c('Red', 'Green', 'Gold'), id = c('1','2','3'))

colors_list <- as.list(as.character(colors$id))
names(colors_list) <- colors$color

colors_list