在 rCharts 中调整轴标签 NVD3 图形答案

【问题标题】：adjusting axis labels NVD3 graph in rCharts在 rCharts 中调整轴标签 NVD3 图形
【发布时间】：2013-07-26 19:43:15
【问题描述】：

我正在使用 rCharts nPlot() 函数来显示给定列联表类型数据的堆叠或分组条形图。 “multiBarChart”显示在闪亮的应用程序中。下面给出了我在闪亮的应用程序中使用的一段代码。

    graphData <- reactive({
    as.data.frame(table(eval(inputVar1()),eval(inputVar2())))
    })

    output$myChart <- renderChart({
    p1 <- nPlot(Freq ~ Var1, group="Var2", data=graphData(), type="multiBarChart")
    p1$addParams(dom='myChart')
    return(p1)
    })

在我的数据集中，一个分类变量有 16 个级别。当此变量沿“multiBarChart”的 x 轴显示时，不会显示所有标签。 nPlot 有没有办法调整轴标签的字体大小？我在想cex.axis=0.5 或cex.lab=0.5 之类的东西。

或者，是否有像 las= 这样的参数，它可以让我将轴标签旋转 90 度，并且可能有一个更清晰的图，其中所有分类变量的标签都沿图的 x 轴显示。

非常感谢该小组可以提供的任何建议！

【问题讨论】：

标签： r nvd3.js shiny rcharts

【解决方案1】：

您的问题的答案可以在here 找到。基本思想是将选项 reduceXTicks 设置为 FALSE 并错开标签。

n1 <- nPlot(value ~ region, data = dat, group = 'variable', 
  type = 'multiBarChart')
n1$chart(reduceXTicks = FALSE)
n1$xAxis(staggerLabels = TRUE)

如果标签很大，您可以使用 CSS 控制文本的大小。目前，您必须手动将其插入到 HTML 中，但在 rCharts 的未来版本中，我将直接从 R 控制台轻松地将任意 HTML/CSS/JS 添加到图表中。

<style>
svg text {font-size: 9px;}
</style>

【讨论】：

我认为这会减少手动插入代码n1$setTemplate(afterScript='<style> svg text {font-size: 9px;}</style>')