`selectedpoints` does not function properly when a vector is passed using `plotlyProxy` & `"restyle"`.
Ninguém assumiu esta issue ainda.
Avaliação
- Dificuldade
- 3/5
- Tempo estimado
- 1-2 dias
- Facilidade para iniciantes
- 45/100
- Tipo de issue
- Bug
- Clareza
- Razoavelmente clara
- Status de atividade
- Estagnada
- Stack de tecnologia
- r
- Domínio
- data-visualization
Direção de pesquisa
Comece executando o exemplo reproduzível de R Shiny fornecido e compare plotlyProxyInvoke com selected_rows contendo c(1) com c(1, 1). Rastreie a atualização de selectedpoints por meio da chamada "restyle" de plotlyProxy; está concluído quando um vetor de valor único seleciona o ponto sem duplicação.
Escrita pelo modelo de indexação a partir do texto da issue.
Descrição
Bug/Unexpected Behavior
When updating a scatter plot's selectedpoints in a Shiny server using "restyle" on a plotlyProxy, single value vectors don't update the graph. E.g., passing c(1) to selectedpoints won't update the graph.
However, if we duplicate this value, e.g., c(1, 1) and pass it to selectedpoints, the 1 point will be selected.
Reproducible example:
# selected points single value incorrect behavior
library(shiny)
ui <- fluidPage(fluidRow(plotly::plotlyOutput("graph"),
DT::DTOutput("table")))
server <- function(input, output, session) {
output$table <- DT::renderDT({
cars
})
output$graph <- plotly::renderPlotly({
plotly::plot_ly(
cars,
x = ~ speed,
y = ~ dist,
selected = list(marker = list(color = "red")),
type = "scatter",
mode = "markers",
source = "graph"
) %>%
plotly::layout(dragmode = "select",
clickmode = "event+select") %>%
plotly::event_register("plotly_selected")
})
plot_proxy <- plotly::plotlyProxy("graph")
table_proxy <- DT::dataTableProxy("table")
selected <-
reactive({
plotly::event_data("plotly_selected", source = "graph")
})
observeEvent(selected(), {
selected <- selected()$pointNumber + 1
table_proxy %>% DT::selectRows(selected)
})
observeEvent(input$table_cell_clicked, {
selected_rows <- input$table_rows_selected - 1
#### comment this conditional to see the bug ####
if (length(selected_rows) == 1) {
selected_rows <- rep(selected_rows, 2)
}
#### end comment this conditional to see the bug ####
plotly::plotlyProxyInvoke(
plotly::plotlyProxy("graph", session),
"restyle",
list(selectedpoints = list(selected_rows)),
0
)
})
}
shinyApp(ui, server)
- Linguagem predominante
- R
- Estrelas
- 2.7k
- Forks
- 640
- Métricas de merge de PRs
- Nenhum PR com merge em 30d
Preparar o ambiente
- Sem Dockerfile nem arquivo Docker Compose
- Sem modelo de pull request
- Ler o guia de contribuição
Primeiros passos
- Leia a issue inteira e depois o guia de contribuição do projeto.
- Comente na issue dizendo que vai assumir — evita que duas pessoas façam o mesmo trabalho.
- Faça um fork do repositório e trabalhe em uma branch.
- Abra um pull request que referencie o número da issue.
Mais de plotly/plotly.R
-
Dificuldade 2/5 1-3 horas Facilidade para iniciantes 62/100
-
Dificuldade 4/5 3-5 dias Facilidade para iniciantes 35/100
-
Dificuldade 3/5 1-2 dias Facilidade para iniciantes 68/100
-
Dificuldade 3/5 1-2 dias Facilidade para iniciantes 72/100
-
save_image ErrorAberta
Dificuldade 3/5 1-2 dias Facilidade para iniciantes 52/100
Todas as issues de plotly/plotly.R
Issues semelhantes
-
bug priority: should
Dificuldade 2/5 1-3 horas Facilidade para iniciantes 68/100
The-Strategy-Unit/nhp_outputs#477 ·
-
Dificuldade 1/5 Menos de uma hora Facilidade para iniciantes 68/100
-
Dificuldade 2/5 1-3 horas Facilidade para iniciantes 78/100
Open-Systems-Pharmacology/OSPSuite.ReportingEngine#1380 · 1 comentário ·
-
Dificuldade 2/5 1-3 horas Facilidade para iniciantes 88/100
Open-Systems-Pharmacology/OSPSuite.ParameterIdentification#335 ·
-
Dificuldade 2/5 1-3 horas Facilidade para iniciantes 72/100