Объединение нескольких инструментов в один объект

Один из подходов предполагает импорт данных в новое окружение. Затем можно использовать eapply(), чтобы применить функцию к каждому объекту в этом окружении — аналогично тому, как lapply() работает с каждым элементом списка. Как и lapply(), функция eapply() возвращает список.

После этого все элементы списка можно объединить в один объект с помощью do.call() — это как если бы R сам вводил и выполнял команду за вас. Вместо того чтобы вручную писать merge(my_list[[1]], my_list[[2]], ...), достаточно написать do.call(merge, my_list).

Это упражнение является частью курса

Импорт и управление финансовыми данными в R

Посмотреть курс

Инструкции к упражнению

Используйте eapply(), чтобы применить функцию head() к каждому объекту в data_env. Присвойте результат переменной data_list.
Используйте do.call() и merge(), чтобы объединить все элементы data_list в один объект типа xts с именем data_merged.
Поскольку объекты в окружении не упорядочены, порядок столбцов в data_merged не гарантирован. Используйте OHLC(), чтобы упорядочить их, и сохраните данные в data_ohlc.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Call head on each object in data_env using eapply
data_list <- ___(data_env, ___)

# Merge all the data_list elements into one xts object
data_merged <- ___(___, data_list)

# Ensure the columns are ordered: open, high, low, close

Редактировать и запускать код