r - 如何使用 rCharts、dPlot 和 dimple 更改轴标题

Question

如何更改使用 rCharts 和 dimple.js 库生成的绘图的轴标题？例如:

library(rCharts)
data(mtcars)
mtcars.df <- data.frame( car = rownames(mtcars), mtcars )
d1 <- dPlot(x ="disp", y="mpg", groups=c("car", "cyl"), type ="point", data=mtcars.df)
d1$xAxis( type = "addMeasureAxis")
d1

想要的效果是将变量名“disp”替换为更完整的一段文字作为坐标轴标题。我试过向 d1$xAxis() 行添加参数，如 title="Displacement"和 label="Displacement: 但没有成功。

Answer 1

不好意思我才看到。感谢约翰的回答。

使用 rCharts，我们可以利用 afterScript 模板来添加它。如果 DOM 中只有一个图表，我们可以不加修改地使用 John 的示例。

d1$setTemplate(
  afterScript = 
  '
    d3.selectAll(".axis.title")
    .text(function () {
      var t = d3.select(this).text();
      if (t === "disp") {
          return "Displacement";
      } else if (t === "mpg") {
          return "Miles Per Gallon";
      } else {
          return t;
      }
    }); 
  '
)

如果您想要一个在 DOM 中包含多个图表的示例，或者这对您不起作用，请告诉我。谢谢。