Удаление праздника с биржевого графика с помощью quantmod

Я пытаюсь построить некоторые китайские акции, используя quantmod. Но проблема в том, что график всегда показывал мне неторговый день, например, выходные и праздничные дни. Мне интересно, как удалить эти дни, чтобы сделать график непрерывным.

library("quantmod")

s <- getSymbols("002389.SZ",auto.assign=FALSE)   
head(s)

chartSeries(s, theme = "white", subset = "last 6 months",TA = "addSMA(n=5,col=\"gray\");addSMA(n=10,col=\"yellow\");
                addSMA(n=20,col=\"pink\");addSMA(n=30,col=\"green\");addSMA(n=60,col=\"blue\");addVo()")

person user3015546    schedule 16.02.2014    source источник


Ответы (1)


Я не думаю, что это праздник (с 13.11.2013 по 27.01.2014); это либо плохие данные, либо акция не торговалась несколько дней подряд (посмотрите на объем). Если вы хотите отображать только те дни, когда объем выше нуля, вы можете удалить эти строки перед построением графика.

x <- s[Vo(s)>0]
chartSeries(x, theme = "white", subset = "last 6 months",TA = "addSMA(n=5,col=\"gray\");addSMA(n=10,col=\"yellow\");addSMA(n=20,col=\"pink\");addSMA(n=30,col=\"green\");addSMA(n=60,col=\"blue\");addVo()")
person GSee    schedule 16.02.2014
comment
Имейте в виду, что если вы удалите все эти дни, когда ничего не торговалось (или, может быть, это плохие данные), то вы, вероятно, сделаете ложные выводы из любого технического анализа, который вы делаете. - person GSee; 16.02.2014