У меня есть кадр данных в длинном формате с двумя факторными переменными в виде столбцов, причем первый столбец представляет собой серию уникальных классов, а второй столбец представляет собой переменную группировки (в этом случае - город, в котором проходит класс).Извлечение списка из столбца для каждой группы в другом столбце
class <- c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K")
city <- c("Atlanta", "Atlanta", "Atlanta", "Detroit", "Detroit", "Milwaukee", "Milwaukee", "Milwaukee", "Milwaukee", "Portland", "Juneau")
samp <- data.frame(class, city)
samp
# class city
# A Atlanta
# B Atlanta
# C Atlanta
# D Detroit
# E Detroit
# F Milwaukee
# G Milwaukee
# H Milwaukee
# I Milwaukee
# J Portland
# K Juneau
Для каждого города мне нужен список всех классов, которые там проводятся. В идеале вывод будет выглядеть так:
class.list <- list(Atlanta = c("A", "B", "C"), Detroit = c("D", "E"), Milwaukee = c("F", "G", "H", "I"), Portland = "J", Juneau = "K")
class.list
# $Atlanta
# [1] "A" "B" "C"
#
# $Detroit
# [1] "D" "E"
#
# $Milwaukee
# [1] "F" "G" "H" "I"
#
# $Portland
# [1] "J"
#
# $Juneau
# [1] "K"
Я пробовал различные решения и не смог. Пожалуй, ближе всего я пришел был через dcast
, но это было не совсем выход я целился:
library(reshape2)
class.list <-dcast(samp, city ~ class)
class.list
# place A B C D E F ...
# Atlanta Atlanta Atlanta Atlanta <NA> <NA> <NA> ...
# Detroit <NA> <NA> <NA> Detroit Detroit <NA> ...
# ...
Perfect. Настолько кратки! Спасибо за несколько вариантов. – coip