R: Как использовать элементы одного списка, чтобы переименовать элементы другого списка разной длины?

Question

У меня есть два списка var и xnames. Мне нужно переименовать элементы первого списка элементами второго списка. К сожалению, второй список длиннее первого, поэтому мне нужны только некоторые элементы второго списка для этой операции (в данном случае первые 4).
Я поискал эту проблему на нескольких веб-сайтах, но не смог найти рабочего решения для этой (как я думал) основной c операции. Прошу прощения, если я что-то присмотрел. Большое спасибо за твою помощь!

var <- list(c("x1", "x2", "x3", "x4"))
xnames <- list(c("dim1", "dim2", "dim3", "dim4", "dim5", "dim6", "dim7", "dim8"))

Answer 1

Вы можете использовать Map с xnames и lengths(var), чтобы получить n первых элементов из xnames .

Map(function(x,n) x[1:n], xnames, lengths(var))
#[[1]]
#[1] "dim1" "dim2" "dim3" "dim4"