mapedit изменить цвет и непрозрачность - PullRequest
Новая
       40

mapedit изменить цвет и непрозрачность

0 голосов
/ 26 сентября 2018

У меня есть простое приложение, которое позволяет пользователю нарисовать функцию.Как я также могу позволить пользователю выбирать цвет заливки и прозрачность, предоставляя шестнадцатеричный код.

Воспроизводимый пример: 

library(mapedit)
library(mapview)
library(shiny)
library(colourpicker)

ui <- fluidPage(
  fluidRow(
    editModUI("editor"),
    colourInput('colour', "Select Colour", allowTransparent = TRUE)
  )
)
server <- function(input, output, session) {

  edits <- callModule(editMod, "editor", mapview()@map)

  ### need to somehow adjust the color and/or opacity of the drawn features based on input$colour

}
shinyApp(ui, server)
...