... fluidPage( leafletOutput("mymap"), p(), actionButton("recalc", "New points"), verbatimTextOutput('summary') ) server <- function(input, ...
確定! 回上一頁