rCharts NVD3 Plot消除x轴上日期的间隙

时间:2013-12-23 11:47:24

标签: r nvd3.js rcharts

我想消除x轴上的间隙并消除重叠。

可重复的例子:

require(quantmod)
require(rCharts)
aapl <- getSymbols("AAPL", from="2013-12-13", auto.assign = FALSE)
aapl.df <- data.frame(
  index(aapl),
  coredata(aapl)
)
colnames(aapl.df) <- c("date","open","high","low","close","volume","adjusted")
n1 <- nvd3Plot(
  x = "date",
  y = "close",
  y2 = "volume",
  data = aapl.df,
  type = "linePlusBarChart",
  height = 400,
  width = 800
)
n1$templates$script = file.path(n1$LIB$url,'layouts',"linePlusBar.html")
n1$xAxis(tickFormat =
  "#!function (d) {
            return d3.time.format('%b %d, %Y')(new Date(d));
          }!#"
)
n1

产地: enter image description here 此外,为什么图表从2013年12月12日数据开始于2013年12月13日开始?

> head(aapl.df)
        date   open   high    low  close   volume adjusted
1 2013-12-13 562.85 562.88 553.67 554.43 11856400   554.43
2 2013-12-16 555.02 562.64 555.01 557.50 10078600   557.50
3 2013-12-17 555.81 559.44 553.38 554.99  8163900   554.99
4 2013-12-18 549.70 551.45 538.80 550.77 20180200   550.77
5 2013-12-19 549.50 550.00 543.73 544.46 11439600   544.46
6 2013-12-20 545.43 551.61 544.82 549.02 15548100   549.02

最后,一个额外的问题 - 我想隐藏图表左侧的Y轴标签,但仍然保留工具提示。

谢谢!

0 个答案:

没有答案