R_List из выбранных строк матрицы

Question

У меня есть матрица, и я хочу создать список с выбранными строками этой матрицы, являющимися элементами списка.

Например, это моя матрица

my.matrix=matrix(1:100, nrow=20) 

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

my.n=c(1,2,4,3,5,5) 

Так первый элемент в моем списке должен быть

my.matrix[1,] 

сек ond

my.matrix[2:3,] 

и так далее.

Как это сделать элегантным способом?

Answer 1

Не совсем уверен, но я думаю, что вы хотите что-то вроде этого ...

S <- split(seq_len(nrow(my.matrix)), rep.int(seq_along(my.n), my.n)) 
lapply(S, function(x) my.matrix[x, , drop = FALSE]) 

Здесь мы разделив число строк из my.matrix по репликаций my.n. Затем мы используем lapply() по результирующему списку S подмножеством my.matrix с этими номерами строк.

Answer 2

end <- cumsum(my.n) 
start <- c(1,(end+1)[-length(end)]) 
mapply(function(a,b) my.matrix[a:b,,drop=F], start, end) 

mapply принимает первый аргумент из двух векторов и применяет их к функции. Он переходит ко второму элементу каждого вектора и продолжается через каждый вектор. Это поведение работает для этого приложения, чтобы создать список подмножеств, как описано. кредит для @nongkrong для подхода mapply.