Your example is a bit noisy (for example, c(1;200) does not make sense, maybe you want 1:200 there, or if you want to have a list of lists, something like rep , no check , it should be example and etc.).
Here is the code that I think you need (as far as I could understand it):
x <- rep(list(1:200), 5) f <- function(y) {y[1:20]} sapply(x, f)
Next time, please be more specific, try the code that you send as an example before submitting a question.
source share