update Shiny app to version 1.2.0 with some minor changes.

Author: Tom-Jenkins

R/app_ui.R

@@ -30,7 +30,7 @@ app_ui <- function() {
       class = "custom-navbar",
       style = "background: #18bc9c; color: white; padding: 10px; margin-bottom: 5px;",
       shiny::span(
-        shiny::span(shiny::icon("chart-pie", style = "margin-right: 5px;"), shiny::strong("mapmixture"), shiny::span(class = "badge bg-light mx-1", "1.1.2")),
+        shiny::span(shiny::icon("chart-pie", style = "margin-right: 5px;"), shiny::strong("mapmixture"), shiny::span(class = "badge bg-light mx-1", "1.2.0")),
         shiny::a(
           style = "color: white;",
           href = "https://twitter.com/tom__jenkins",

R/func_mapmixture.R

@@ -10,7 +10,7 @@
 #' @param cluster_cols character vector of colours the same length as the number of clusters.
 #' If `NULL`, a blue-green palette is used.
 #' @param cluster_names character vector of names the same length as the number of clusters.
-#' If `NULL`, the cluster column names are used.
+#' If `NULL`, the clusters are named cluster01, cluster02, ..., clusterN.
 #' @param boundary named numeric vector defining the map bounding. e.g. `c(xmin=-15, xmax=15, ymin=30, ymax=50)`.
 #' If `NULL`, a default bounding box is calculated.
 #' @param crs coordinate reference system. Default is the WGS 84 - World Geodetic System 1984 (EPSG:`4326`).

app.R

@@ -1,5 +1,5 @@
 # Script to deploy Shiny app to shinyapps.io
-# Run rsconnect::deploy() to deploy
+# Run rsconnect::deployApp() to deploy
 
 # Load packages
 library(bslib)