From c281ee629598c706be1123eba3fccd21a6acf2ce Mon Sep 17 00:00:00 2001
From: jbris <james.bristow@plantandfood.co.nz>
Date: Mon, 11 Dec 2023 04:29:17 +1300
Subject: [PATCH] adding tooltips

---
 my_first_app/ui.R | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/my_first_app/ui.R b/my_first_app/ui.R
index cb86be0..98f5eb0 100644
--- a/my_first_app/ui.R
+++ b/my_first_app/ui.R
@@ -14,7 +14,12 @@ ui <- page_sidebar(
       accordion_panel(
         "Inputs",
         radioButtons(
-          "dataset", "Dataset",
+          "dataset", 
+          tooltip(
+            span("Dataset", bsicons::bs_icon("question-circle-fill")),
+            "Select explanatory and response variables for a dataset.",
+            placement = "left"
+          ),
           dataset_choices,
           inline = TRUE
         ),
@@ -36,7 +41,12 @@ ui <- page_sidebar(
       accordion_panel(
         "Mapping",
         selectInput(
-          "mapping_location", "Location",
+          "mapping_location", 
+          tooltip(
+            span("Location", bsicons::bs_icon("question-circle-fill")),
+            "Select the view location for the map.",
+            placement = "left"
+          ),
           location_choices,
           multiple = FALSE,
           selectize = TRUE