Использовать функцию конечных точек, чтобы получить начальные точки вместо этого?

У меня есть объект XTS под названиемDaily_Quotes который содержит котировки акций. я используюendpoints чтобы получить ежемесячные котировки акций, которые я получил с помощьюgetSymbols (из пакета QuantMod). Я заметил, чтоendpoints Функция создает индекс строки, которая содержит последний торговый день для определенного месяца, и назначает его новому объекту для указанного диапазона дат. Есть ли способ получить первый торговый день месяца?

# My code    
Monthly_Quotes <- Daily_Quotes[endpoints(Daily_Quotes,'months')]

То, что я пытался сделать, было:

# This gave me the next day or 1st day of the next month
# or next row for the object.
endpoints(Daily_Quotes,'months') + 1

# So I applied this and it gave me 
# Error in `[.xts`(Daily_Quotes, endpoints(Daily_Quotes, "months") + 1) :
# subscript out of bounds
Monthly_Quotes <- Daily_Quotes[endpoints(Daily_Quotes,'months') + 1]

Как я пытаюсь решить эту проблему?

Ответы на вопрос(1)

Ваш ответ на вопрос