考虑从rCharts / NVD3示例页面提取的图

p6 <- nPlot(uempmed ~ date, data = economics, type = 'lineChart')
p6


我试图让我的y轴显示百分比,所以我尝试了以下代码(在R: interactive plots (tooltips): rCharts dimple plot: formatting axis之后),但它返回了一个空白页

p6 <- nPlot(uempmed ~ date, data = economics, type = 'lineChart')
p6$yAxis(outputFormat = "%")
p6


我做了一些研究,并做了以下工作:

p6 <- nPlot(uempmed ~ date, data = economics, type = 'lineChart')
p6$yAxis(tickFormat = "#! function(d) {return d*100 + '%' } !#")
p6


现在,我知道0个javascript,并希望至少在短期内尽可能多地停留在R中。有人可以让我知道吗


为什么第一种方法不起作用,以及
第二种方法是否是最好的方法

最佳答案

由于对1的答案在@jdharrison的评论中,因此我想我将使用完整的代码示例快速地回答#2,并提供说明实现同一件事的不同方法的评论。

  #turn off rstudio viewer
  #since we will be making lots of charts
  #we'll turn it back on at end
  oldviewer = options("viewer")
  options(viewer=NULL)

  data(economics, package = "ggplot2")

  #if we know we would like percent
  #and R is our friend but javascript is not
  #we could do some transformation in R
  economics$uempmed <- economics$uempmed/100

  p6 <- nPlot(uempmed ~ date, data = economics, type = 'lineChart')
  p6
  #then we could use d3.format just like the dimple example
  #except dimple assumes the d3.format part so we just need "%"
  #see https://github.com/PMSI-AlignAlytics/dimple/wiki/dimple.axis#tickFormat
  #for more on d3.format
  #see https://github.com/mbostock/d3/wiki/Formatting#d3_format
  p6$yAxis( tickFormat = "#!d3.format('%')!#" )
  p6

  #however your method works fine also
  p6$yAxis(tickFormat = "#! function(d) {return d*100 + '%' } !#")
  p6

  #but let's say we did not do the above transform
  #dividing by 100
  #here is how we could do it in javascript
  data(economics, package = "ggplot2")
  p6 <- nPlot(uempmed ~ date, data = economics, type = 'lineChart')
  p6$yAxis(tickFormat = "#! function(d) {
    //will change to .2% to show how to get two decimal
   return d3.format('.2%')(d/100)
  } !#")
  p6

  #turn rstudio viewer back on
  options(viewer = oldviewer)

09-07 04:47