Доступ и сохранение имен списков в функции lapply

Мне нужно получить доступ к именам списков внутри функции lapply. Я нашел несколько потоков в Интернете, где сказано, что я должен перебирать имена списка, чтобы иметь возможность получить имя каждого элемента списка в моей функции:

> n = names(mylist)
> mynewlist = lapply(n, function(nameindex, mylist) { return(mylist[[nameindex]]) }, mylist)
> names(mynewlist)
NULL
> names(mynewlist) = n

Проблема в том, что mynewlist теряет исходные индексы mylist, и мне нужно добавить это last names () назначение для их восстановления.

Есть ли способ дать явное имя индекса каждому элементу, возвращаемому функцией lapply? Или другой способ убедиться, что для элементов mynewlist заданы правильные имена индексов? Я считаю, что имена индексов mynewlist могут быть неправильными, если lapply не возвращает элементы списка в том же порядке, что и mylist.