подмножество фреймов данных и создание вложенных списков - PullRequest
0 голосов
/ 24 апреля 2020

У меня есть временной ряд для каждого продукта :

ts <- list()
ts[["p1"]] <- ts(seq(1,5), start=c(2019,1), frequency=12)
ts[["p2"]] <- ts(seq(1,5), start=c(2019,1), frequency=12)
ts[["p3"]] <- ts(seq(1,5), start=c(2019,1), frequency=12)
ts[["p4"]] <- ts(seq(1,5), start=c(2019,1), frequency=12)
ts[["p5"]] <- ts(seq(1,5), start=c(2019,1), frequency=12)

и отношения между продукт и категория в кадре данных

category <- c("cA","cA","cB","cB","cB")
product <- c("p1","p2","p3","p4","p5")
df_product_category <- data.frame(product,category)

Сначала я хочу список для каждой категории :

list_category <- list(unique(df_product_category$category))
#this doesn´t work

Затем я хочу создать еще один список за категория , содержащая все продукты в категории

list_category <- c("cA","cB")

, как только у меня есть этот список, мне нужен вложенный список для каждой категории, содержащий каждый из продуктов в пределах этой категории

list_product_category <- list()
list_product_category$'cA' <- c("p1","p2")
list_product_category$'cB' <- c("p2","p3","p4")

затем I wi sh для создания другого списка вложенность : category-product-tslike this:

ts_list_product_category <- list()
ts_list_product_category[[cA]]$p1 <- ts[["p1"]]
ts_list_product_category[[cA]]$p2 <- ts[["p2"]]
ts_list_product_category[[cB]]$p3 <- ts[["p3"]]
ts_list_product_category[[cB]]$p4 <- ts[["p4"]]
ts_list_product_category[[cB]]$p5 <- ts[["p5"]]

Заранее спасибо :)

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...