Alterando a espessura e a opacidade da linha no gráfico de dispersão no onRender () html
Espero fazer um gráfico usando a função onRender () do pacote R htmlwidgets, na qual um usuário pode clicar em um ponto e desenhar uma linha. Eu tenho o ponto crucial dela trabalhando agora, onde uma linha cinza é desenhada com a espessura padrão e provavelmente com a opacidade padrão.
No entanto, fiquei preso em alterar a espessura da linha (e possivelmente alterar a opacidade da linha, embora ela esteja funcionando e não a consiga ver, pois a linha é muito fina). Quero que a linha seja muito grossa e bastante transparente. Tentei vários parâmetros e abordagens para a largura e opacidade da linha (alguns dos quais são comentados abaixo), mas parece que eles não fazem diferença. Alguma idéia do que posso estar perdendo? Obrigado.
library(plotly)
library(broom)
dat <- mtcars
dat$mpg <- dat$mpg * 10
p <- ggplot(data = dat, aes(x=disp,y=mpg)) + geom_point(size=0.5)
ggplotly(p) %>%
onRender("
function(el, x, data) {
// reduce the opacity of every trace except for the hover one
el.on('plotly_click', function(e) {
var trace1 = {
x: [100, 400],
y: [100, 400],
mode: 'lines',
//line: dict(color: 'gray', width: 100)
marker: {
color: 'gray',
size: 200,
width: 1000,
opacity: 0.5
}
}
Plotly.addTraces(el.id, trace1);
})
}
", data=dat)