Получить ежемесячные данные DAX составляющих

Question

У меня есть проект в университете, где мне нужно использовать ежемесячную цену закрытия для 10 компонентов DAX, используя Yahoo Finance. Я попробовал с кодом от моего учителя.

Я использую R с пакетом quantmod. Данные были загружены в виде файлов CSV на моем компьютере

#download my securities
getSymbols(TickersDAX, from=DStart, to=DEnd, warnings=F) 
#ticker list
Ticker_list <- list(BEI.DE,ADS.DE,DBK.DE,DAI.DE,DB1.DE,BMW.DE,ALV.DE,BAYN.DE,CON.DE,BAS.DE,GDAXI)

Я получил ежедневные цены, даже не отображая полный год. Что мне нужно добавить, чтобы получать только месячные цены закрытия?

Answer 1

Я не xts эксперт, но вот пример кода для получения последнего дня в месяце от объекта xts с использованием lubridate и dplyr:

library(quantmod)
library(lubridate)
library(dplyr)

getSymbols('QQQ')                

df <- tibble(
  date = index(QQQ),
  year = year(date),
  month = month(date)
)

df1 <- df %>% 
  mutate(index = row_number()) %>% 
  group_by(year, month) %>% 
  summarise(index = last(index))

QQQ[df1$index]