rCharts-如何将轴标签和标题添加到 NVD3 图表

我正在探索 rCharts。我在向 Y 轴和标题添加标签时卡住了。我是 rCharts 的新手。

这是我的示例代码

require(rCharts)
n2 <- nPlot(Hours ~ Month, group = "Task", data = cars, type = "multiBarChart",
height = 900, width = 1110)
n2$xAxis(axisLabel = 'Year and Month')
n2

请帮忙。

最佳答案

答案补充标题示例 2013-12-05

我不记得为什么 nvd3 和 rCharts 这样做，但我们在这个 issue 中发现了这一点。该问题中建议的方法有效，但使用 margin 可能是更可靠的方法。我已经将两种方式放在一起的快速示例。让我知道这是如何工作的。

      require(rCharts)

      df <- data.frame(x=1:20,y=runif(n=20))

      n1 <- nPlot(
        y~x,
        data=df,
        type="multiBarChart"
      )
      n1$yAxis( axisLabel = "Randomness" )

      #nvd3 draws the label but falls outside the bounds
      #so two ways to fix

      #best way I believe is to set the margin to allow room
      #nvd3 draws at -63, so something bigger than 63
      n1$chart(margin = list(left = 100))
      n1


      #second way as discussed here
      #https://github.com/ramnathv/rCharts/issues/102
      n1$yAxis( axisLabel = "Randomness", width = 40 )
      n1

现在让我们添加一个标题

有几种方法可以实现这一点。我目前更喜欢使用带有 rCharts 的脚本模板。这里有两个例子。 <h3> 元素插入到 rCharts div 中。如果您想了解它们是如何工作的，这两个模板位于 this repo 中。

      #for a local template something like this
      #n1$templates$script <- "./chartWithTitle.html"
      n1$templates$script <- "http://timelyportfolio.github.io/rCharts_nvd3_templates/chartWithTitle.html"
      n1$set(title = "rCharts + nvd3 Power")
      n1

      #using some css style from http://tympanus.net/codrops/2012/11/02/heading-set-styling-with-css/
      #put in a different template
      n1$templates$script <- "http://timelyportfolio.github.io/rCharts_nvd3_templates/chartWithTitle_styled.html"
      n1

关于rCharts-如何将轴标签和标题添加到 NVD3 图表，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/20334863/