Как получить время при запросе index () из объекта XTS? - PullRequest
0 голосов
/ 10 июня 2018

У меня есть:

> dput(head(data))
structure(list(Gmt.time = c("01.06.2015 00:00", "01.06.2015 00:01", 
"01.06.2015 00:02", "01.06.2015 00:03", "01.06.2015 00:04", "01.06.2015 00:05"
), Open = c(0.88312, 0.88337, 0.88377, 0.88412, 0.88393, 0.8838
), High = c(0.88337, 0.88378, 0.88418, 0.88418, 0.88393, 0.88393
), Low = c(0.883, 0.88337, 0.88374, 0.88394, 0.88368, 0.88362
), Close = c(0.88337, 0.88375, 0.88412, 0.88394, 0.8838, 0.88393
), Volume = c(83.27, 100.14, 117.18, 52.53, 77.69, 91.63)), .Names = c("Gmt.time", 
"Open", "High", "Low", "Close", "Volume"), row.names = c(NA, 
6L), class = "data.frame")

Я преобразую в xts

data_xts <- xts(head(data[,2:6]), as.POSIXct(head(data[,1]), format='%d.%m.%Y %H:%M'))

> str(data_xts)
An ‘xts’ object on 2015-06-01/2015-06-01 00:05:00 containing:
  Data: num [1:6, 1:5] 0.883 0.883 0.884 0.884 0.884 ...
 - attr(*, "dimnames")=List of 2
  ..$ : NULL
  ..$ : chr [1:5] "Open" "High" "Low" "Close" ...
  Indexed by objects of class: [POSIXct,POSIXt] TZ: 
  xts Attributes:  
 NULL
> 

и пытаюсь получить полное имя индекса и время:

index(data_xts[1,])

return:

> index(data_xts[1,])
[1] "2015-06-01 BST"

где первый элемент в моем dput имеет "01.06.2015 00:00"

мне нужно, чтобы мой вывод включал '00: 00 '

заранее спасибо

1 Ответ

0 голосов
/ 10 июня 2018

Временная часть 00:00 для первого индекса.Если нам нужно, мы можем format и получить его в виде строки

format(index(data_xts[1,]), "%Y-%m-%d %H:%M")
#[1] "2015-06-01 00:00"
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...