Удалите линии на графике на поверхности по осям x, y и z

Question

Когда я делаю следующий сюжет с plotly в R

library(plotly)
library(mvtnorm)
y <- x <- seq(-10, 10, length = 80)
sig <- diag(7^2, 2)
cn <-  list(c(0.0, "rgb(192,192,192)"), list(1, "rgb(0, 0, 0)"))
con <- list(
  x = list(highlight = FALSE), 
  y = list(highlight = FALSE), 
  z = list(highlight = FALSE))
dens <- matrix(dmvnorm(expand.grid(x, y), sigma = sig), ncol = length(x))
plot_ly(showscale = FALSE, color = I("black")) %>% 
  add_surface(z = dens, x = x, y = y, colorscale = cn, hoverinfo = "none",
              opacity = .9, contours = con) %>%
  layout(
    scene = list(
      xaxis=list(title = "x1", range = c(-10, 10)),
      yaxis=list(title = "x2", range = c(-10, 10)),
      zaxis=list(title = "density")), 
    plot_bgcolor = 'rgb(0, 0, 0, 0)', paper_bgcolor = 'rgba(0,0,0,0)')  %>% 
  config(displayModeBar = FALSE)

тогда я по-прежнему получаю линии на плоскости x, y и z, когда нахожу курсор над точкой (моя мышь находится на черной стрелке, и я хочу удалить линии, которые идут на красные стрелки)

Могу ли я удалить эти строки, и если да, то как? Я не хочу, чтобы что-то происходило, когда я наводил курсор на график.

Answer 1

Замена

scene = list(
  xaxis = list(title = "x1", range = c(-10, 10)),
  yaxis = list(title = "x2", range = c(-10, 10)),
  zaxis = list(title = "density"))

от

scene = list(
  xaxis = list(title = "x1", range = c(-10, 10), showspikes = FALSE),
  yaxis = list(title = "x2", range = c(-10, 10), showspikes = FALSE),
  zaxis = list(title = "density", showspikes = FALSE))

делает работу.