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

Пожалуйста помоги.


person user3047471    schedule 02.12.2013    source источник
comment
Вот мой пример кода: › n2 ‹- nPlot(часы ~ месяц, группа = задача, данные = автомобили, тип = multiBarChart, высота = 900, ширина = 1110) › n2$xAxis(axisLabel = 'Год и месяц') › n2 -- мне все еще нужно добавить ось Y и заголовки в гистограмму   -  person user3047471    schedule 02.12.2013
comment
Я надеюсь, что вы не возражаете, что я отредактировал ваш вопрос, чтобы сделать его более читабельным.   -  person dickoa    schedule 02.12.2013


Ответы (1)


ответ дополнен примерами заголовков 2013-12-05

Я не могу вспомнить, почему nvd3 с rCharts делают это, но мы обнаружили это в этом выпуске. Метод, предложенный в этом выпуске, работает, но использование 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> вставляется в div rCharts. Два шаблона находятся в этом репозитории, если вы хотите увидеть, как они работают.

      #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
person timelyportfolio    schedule 02.12.2013
comment
Замечательный! Я выбрал второй способ, и он сработал. Я все еще не могу добавить заголовок, и мне нужна ваша помощь, чтобы добавить помощь в заголовок, выделенный жирным шрифтом. - person user3047471; 02.12.2013
comment
Я не уверен, поддерживает ли NVD3 заголовки. - person Ramnath; 03.12.2013
comment
Спасибо большое. Я ценю ваш быстрый ответ. - person user3047471; 03.12.2013
comment
Я добавил два примера заголовков выше, используя шаблоны сценариев rCharts. - person timelyportfolio; 05.12.2013
comment
Потрясающие участники!! Спасибо еще раз. - person user3047471; 18.12.2013
comment
@timelyportfolio, это работает очень хорошо, спасибо. Я не мог заставить его работать в блестящем приложении, есть идеи? Должен ли я опубликовать вопрос об этом с сутью? - person PatrickT; 13.05.2014