Question

SecurityContext

我想创建一个CandleStick图。但我的问题是如何计算开，关，高，低值。 R里有没有图书馆？谢谢。

我的循环：

InvoiceDate<-c("2018-01-01 08:26:00","2018-01-01 08:26:00","2018-01-01 08:26:00","2018-01-01 08:26:00","2018-01-02 08:26:00","2018-01-02 08:26:00","2018-01-02 08:26:00","2018-01-02 08:26:00","2018-01-03 08:26:00","2018-01-04 08:26:00","2018-01-04 08:26:00","2018-01-04 08:26:00")
UnitPrice<-c(2.27,2.28,2.29,2.30,2.31,2.32,3.22,5.26,2,26,3.23,2.50)
myData<-data.frame(InvoiceDate,UnitPrice)

因此，开放价值意味着它是每个日期的第一个值和close值是每个日期的最后一个值。最小值和最大值是每个日期的最小值和最大值

它正在工作，但是在例如“2018-01-04 08:26:00”的最后日期错过行

Answer 1

所以也许你可以使用dplyr：（这里我假设您的数据按时间顺序排序，您可能需要排序或安排在某处）：

library(dplyr)
myData %>% group_by(trunc(as.Date(InvoiceDate), "day")) %>% summarize(open_val = first(UnitPrice), close_val = last(UnitPrice), max_val = max(UnitPrice), min_val = min(UnitPrice))

CandleStick图表准备数据（开盘价，收盘价，最高价，最低价）

1 个答案: