метки регулирующих осей График NVD3 в rCharts

Question

Я использую функцию 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 уровней. Когда эта переменная отображается вдоль оси x «multiBarChart», отображаются не все метки. Есть ли способ в 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 я упростим добавление произвольного HTML/CSS/JS к вашей диаграмме прямо с консоли R.

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