Лучший способ построить кластер OHLC по кластеру в R

Question

Я пытаюсь построить диаграммы OHLC в R, где они принадлежат кластеру kmeans.

Я создал кластер kmeans для своих данных и добавил кластер, который подходит для моих данных XTS.

                    Open   High     Low   Close ..2
2008-06-25 18:00:00    0 0.0017  0.0000  0.0015   9
2008-06-25 22:00:00    0 0.0102 -0.0045  0.0080   6
2008-06-26 02:00:00    0 0.0014 -0.0002  0.0000   9
2008-06-26 06:00:00    0 0.0005 -0.0003  0.0003   9
2008-06-26 10:00:00    0 0.0016 -0.0025  0.0010   9
2008-06-26 14:00:00    0 0.0010 -0.0011 -0.0007   9

Последний столбец - это кластер, к которому он принадлежит.

Я пытаюсь найти лучший способ построить это в R с помощью гистограммы OHLC и сгруппировать по последнему столбцу.

Я просмотрел QuantMod и обзор сюжетов, но не могу понять, как это сделать?

Answer 1

Попробуйте что-нибудь подобное

s <- get(getSymbols('SPY'))["2012::"]
s$h <- Hi(s) / Op(s) - 1
s$l <- Lo(s) / Op(s) - 1
s$c <- Cl(s) / Op(s) - 1
s$cluster <- as.numeric(kmeans(s[,7:9] , centers = 6)$cluster)
chart_Series(xts(coredata(s)[order(s$cluster),],order.by = index(s))

И результат

Очевидно это только для показа.

Второй подход заключается в том, чтобы построить ТП поверх графика.

chart_Series(s)
add_TA(Lo(s) * 0.99 , on=1 , type = 'p' , cex = 1.5 , pch = 20 , col = s$cluster)

И выход