考虑从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)