r - 使用 rCharts 创建 NVD3 半圆 donut

Question

我正在尝试使用 rCharts 创建一个简单的半圆 donut 和 NVD3 JavaScript 库。下面提供了一个完整的 donut 的最小可重复示例。

library(rCharts)
data1 <- data.frame(label=c("A","B","C"), value=c("1000","2000","3000"))
n1 <- nPlot(value~label, data = data1, type = "pieChart")
n1$chart(donut=TRUE)
n1

当我尝试指定 startAngle 时出现问题和 endAngle提供的选项 here在 NVD3 文档中，为了将这个 donut 转换成半圆形 donut 。

# This gives me a blank Viewer pane
n1$chart(donut=TRUE,
         startAngle="#!function(d){return d.startAngle/2-Math.PI/2;}!#",
         endAngle="#!function(d){return d.endAngle/2-Math.PI/2;}!#")
n1

查看来自 this 的代码问题，看来路过 startAngle和 endAngle到 n1$params$chart可能不是这样做的正确方法，尽管这是基于 donut=TRUE 的事实我所期望的作品。

也有可能是我的一个回调函数的语法不正确——根据我的经验，这类问题可能会导致整个可视化效果崩溃。但是，我相当确定我使用了 NVD3 文档中提供的完全相同的回调函数。

Answer 1

rCharts 库不允许您按原样执行此操作。我 fork 并修改它以包含最新的 nvd3 JavaScript，并添加了通过 R 中的 .$pie 函数向 chart.pie 添加参数的可能性。

您可以在此处获取 rCharts 分支:https://github.com/clecocel/rCharts

对于基于 rCharts 快速入门的最小示例:

p5 <- nPlot(~ cyl, data = mtcars, type = 'pieChart')
p5

你会看到 growOnHover选项现在默认激活。

要创建一个半 donut ，您现在确实可以使用:

p5$chart(donut=T)
p5$pie(startAngle="#!function(d){return d.startAngle/2-Math.PI/2;}!#",
       endAngle="#!function(d){return d.endAngle/2-Math.PI/2;}!#"))