r - 在 rCharts 中调整轴标签 NVD3 图形

Question

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

    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 轴显示。

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

Answer 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 的 future 版本中，我将使直接从 R 控制台向您的图表添加任意 HTML/CSS/JS 变得容易。

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