Проблемы с доступом к двойным элементам в списке в R

Question

Я выполнил начальную загрузку с 2000 повторных образцов модели Ли Картера для прогнозирования смертности. Вопрос не конкретизируется c для исследований смертности, а касается более общих измерений в R.

После выполнения начальной загрузки я получаю список из 2000 элементов, каждый для каждой из 2000 переоценок модели. Для каждой модели есть оценки моих 3 переменных: a_x, b_x и k_t. И a_x, и b_x задают возраст c, поэтому «x» обозначает возраст в интервале [0:95].

Теперь я хотел бы построить гистограмму всех значений b_x для возраста x = 70.

### Performing the bootstrap:
JA_lc_fitM_boot1 <- bootstrap(LCfit_JA_M, nBoot = 2000, type = "semiparametric")

### Plotting the histogram with all b_x for x = 70:
JA_lc_fitM_boot1[["bootParameters"]][1:2000][["bx"]][[70]]

Я пробовал несколько вариантов, но не могу заставить его работать. Меня смущает то, что я работаю с двойным списком в списке.

Я добавил изображение с данными ниже:

https://ibb.co/4fMGv8R

У кого-нибудь есть решение этой проблемы?

Answer 1

Возможно, вы захотите взглянуть на пакет purrr и семейство функций map или tidyr и функцию hoist.

(Если вам нужен код, который работает, Вы действительно должны предоставить некоторые данные!)

Answer 2

Похоже, вам нужно семейство функций apply. Ваши данные не могут быть воспроизведены, поэтому я не могу подтвердить, что это сработает, но если вы это сделаете:

result <- sapply(JA_lc_fitM_boot1[["bootParameters"]], function(var) var[["bx"]][[70]])

Вы должны получить то, что ищете.