1

下面的 MWE 过于简化了我的真正目标。但是，我有一个需要很长时间才能绘制的背景图像（在下面的示例中，它只是 32 个 mtcars 数据集值的散点图）。用户可以从我的背景图像中单击某些点，这将导致绘制新点。我的目标是在顶层简单地重新绘制这些新点，而无需重新绘制背景图像散点图以节省时间和计算量。

我的 MWE 如下：

library(plotly)
library(htmlwidgets)

g <- ggplot(mtcars, aes(x=mpg, y=cyl)) + geom_point()
gP <- ggplotly(g)

gP %>% onRender("
          function(el, x) {
            myGraph = document.getElementById(el.id);

            el.on('plotly_click', function(e) {

              console.log(e)
              console.log(e.points[0].x)

              var trace1 = {
                x: [e.points[0].x-.3, e.points[0].x-.3, e.points[0].x+.3, e.points[0].x+.3],
                y: [e.points[0].y-.3, e.points[0].y+.3, e.points[0].y-.3, e.points[0].y+.3],
                type: 'scatter',
                fillColor : 'red', 
                size: 20
              };

              Plotly.addTraces(el.id, trace1);
           })}
           ")

当用户单击 32 个黑点中的任何一个时，会在单击的黑点周围绘制四个彩色红点。这主要是有效的，如果您单击 32 个黑色数据点中的任何一个，您应该会看到围绕它绘制的四个彩色点。然而，我留下了几个问题：

1）如何改进这一点，使四个彩色点不被线连接？

2) 我怎样才能使 size 和 fillColor 真正起作用？当我改变它们的值时，我看不到它们有效果。

3) 这是使交互和绘图尽可能快的合理语法吗？我很确定背景图像没有以有效的方式重绘，但我很想听到关于它的确认，因为我是这种语法的新手。如果我要在顶层添加 100 个新点，这仍然有效吗？如果没有，我将很高兴听到有关改进语法的建议。

谢谢你。

4

1 回答 1

0

1）如何改进这一点，使四个彩色点不被线连接？

添加mode: 'markers'到您的trace对象

2) 我怎样才能使 size 和 fillColor 真正起作用？当我改变它们的值时，我看不到它们有效果。

这些值需要在marker对象内部并且fillColor需要是color.

marker: 
{
    color: 'red',   
    size: 20        
}

3) 这是使交互和绘图尽可能快的合理语法吗？我很确定背景图像没有以有效的方式重绘，但我很想听到关于它的确认，因为我是这种语法的新手。如果我要在顶层添加 100 个新点，这仍然有效吗？如果没有，我将很高兴听到有关改进语法的建议。

这有点基于意见。问题是您使用 ggplot 创建模板，该模板创建了相当复杂的图。使用 100 分，每次单击后您都会有相当长的延迟。

修复 x/y 轴范围将稍微改进绘图，因为如果新值超出旧值的范围，则需要调整图形的大小。

gP %>% 
  layout(
    xaxis = list(range = c(8, 35)),
    yaxis = list(range = c(3, 9))
  )

如果您可以在不使用 ggplotly 的情况下绘制绘图，则可以只创建一次跟踪，然后通过extendTraces.

但我认为它尽可能好，最后它是一个基于浏览器的库而不是一个独立的程序。

library(plotly)
library(htmlwidgets)

g <- ggplot(mtcars, aes(x=mpg, y=cyl)) + geom_point()
gP <- ggplotly(g)
gP %>% 
 layout(
    xaxis = list(range = c(8, 35)),
    yaxis = list(range = c(3, 9))
  )

gP %>% onRender("
function(el, x) {
  myGraph = document.getElementById(el.id);
  el.on('plotly_click', function(e) 
    {

      var trace1 = {
        x: [],
        y: [],
        mode: 'markers',
        marker: {
          color: 'red',   
          size: 20
        }
      };
      for (var i = 0; i < 100; i+= 1){
        trace1.x.push(e.points[0].x + Math.random() - 0.5)
        trace1.y.push(e.points[0].y + Math.random() - 0.5)
      }
    Plotly.addTraces(el.id, trace1);
  }
)}
")
于 2017-02-25T12:16:45.143 回答