Выбор элементов списка на основе вектора R

Question

У меня очень большой список mylidt, где каждый элемент соответствует последовательности лет, представленной myYears - короткий пример ниже. Элементы списка не были названы. Тогда у меня есть векторы goodyear badyear и neutralyear, и я хотел бы использовать их для создания трех новых списков, каждый из которых выбирает правильные элементы из списка. Для goodyear это будет элемент [[2]], [[5]] и т. Д. Какой элегантный способ сделать это?

A <- seq(900,1000,1)
B <- rnorm(101,10,2)
C <- rnorm(101,10,2)
D <- rnorm(101,10,2)
E <- rnorm(101,10,2)
G <- rnorm(101,10,2)
H <- rnorm(101,10,2)
I <- rnorm(101,10,2)
J <- rnorm(101,10,2)
K <- rnorm(101,10,2)

mylist <- list(A,B,C,D,E,G,H,I,J,K)

myYears <- seq(1981,1990,1)

goodyear <- c(1981,1985)
badyear <- c(1984,1986,1990)
neutralyear <- myYears[!myYears %in% c(goodyear,badyear)]]