2

我在使用 tmap 加载地图时遇到问题。当我运行闪亮的代码时,会显示输入部分,但不会显示输出。代码不会崩溃,但它也永远不会完成运行。我的目标是能够拥有一个使用tmapand的交互式地图leaflet,它已经能够在闪亮之外运行。

library(tmap) # and maybe also: library(tmaptools)
library(shiny)

ui <- fluidPage(
  titlePanel("Europe"),

  mainPanel(
    plotOutput(outputId = "europe")))

server <- function(input, output) {

  output$europe <- renderPlot({
    qtm(Europe)})}

shinyApp(ui, server)
4

1 回答 1

2

一切对我有用:

library(shiny)
library(tmap)
data("Europe")

ui <- fluidPage(
  titlePanel("Europe"),
  mainPanel(
    plotOutput(outputId = "europe")))

server <- function(input, output) {

  output$europe <- renderPlot({
    qtm(Europe)
  })
}

shinyApp(ui, server)

在此处输入图像描述

于 2018-06-13T16:14:41.607 回答