diff --git a/inst/biblioshiny/server.R b/inst/biblioshiny/server.R index e2dadf9f..64cadbeb 100644 --- a/inst/biblioshiny/server.R +++ b/inst/biblioshiny/server.R @@ -1003,7 +1003,7 @@ server <- function(input, output, session) { CO$Tab=gsub("UNITED KINGDOM","UK",CO$Tab) CO$Tab=gsub("KOREA","SOUTH KOREA",CO$Tab) - map.world <- ggplot2::map_data("world") + map.world <- map_data("world") map.world$region=toupper(map.world$region) dplyr::anti_join(CO, map.world, by = c('Tab' = 'region')) diff --git a/inst/biblioshiny/ui.R b/inst/biblioshiny/ui.R index 75128e16..b9ed47ed 100644 --- a/inst/biblioshiny/ui.R +++ b/inst/biblioshiny/ui.R @@ -9,6 +9,7 @@ if (!(require(shinythemes))){install.packages("shinythemes")} if (!(require(wordcloud2))){install.packages("wordcloud2")} if (!require(colourpicker)){install.packages("colourpicker")} if (!require(treemap)){install.packages("treemap")} +if (!require(ggmap)){install.packages("ggmap"); require(ggmap, quietly=TRUE)} # Main NavBar ----