在R中按集群绘制OHLC集群的最佳方法
我正在尝试在R中绘制OHLC图表，根据它们在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最后一列是它所属的集群。
我正在尝试找出用OHLC条形图在R中绘制并按最后一列分组的最佳方法。
我已经看过了quantmod和剧情概述，但我似乎想不出怎么做？
回答 1
Stack Overflow用户
回答已采纳
发布于 2013-07-02 14:51:24
试试这样的东西
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))结果是
显然，这只是为了展示。
第二种方法是在图的顶部绘制TA
chart_Series(s)
add_TA(Lo(s) * 0.99 , on=1 , type = 'p' , cex = 1.5 , pch = 20 , col = s$cluster)和输出
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/17416522
复制相关文章
相似问题
腾讯云开发者
