Preparation changes for external testing (v1) (#22)

* Chore: Move region dev scripts to own folder in dev

* Chore: Creating and starting dev workshop script for Stat neigh page

* Data: Updated Data dict for 0 dps

* Fix: Adding base family font specification to general_theme() for shinyapps io

* Fix: Use css to apply font to ggiraph plot

* Fix: Trying Arimo font loaded using gdtools

* Fix: Adding gfonts to renv

* Fix: Removed gdfonts method to get Arial in plots, using css

* Chore: Setting up the stat neigh page workshop script

* Chore: Remove merged gdtools method

* Feat: Turned of pagination for Region Region table

* Feat: Adding small x to remove inputs from multi-choice input chart on Regions page

* Feat: Plots now use Years from BDS, meaning we have more info such as 2019-20, also fixed issue on multi-chart with continuing labels

* Chore: Updated user guide to make more sense for LAIT for testing

* Chore: Add using app section in user guide and roxygen comments for internal link mod

* Chore: Adding banners to each info page to signal they are in beta phase

* Chore: Adding link to feedback form to support and feedback tab

* Fix: Dynamic window title fixed as uses nav_panel value rather than title, also updated UI test for this

* Tests: Updated LA line chart screenshot test for new X-axis labels

* Feat: Adjusting tables widths so they don't need scroll bars and font changes with screen size

* Chore: Made main panel col width 10 and adjusted css accordingly, also improved spacing of stats table in LA page

* Feat: Further css improvements to padding and layout for mobile view

* Tests: Updated LA screenshot tests

* Tests: Updated LA screenshot tests

* Chore: Added feedback form to navigation tab for testing purposes

02_dev/la_level_page/la_dev_app.R

@@ -251,7 +251,12 @@ server_dev <- function(input, output, session) {
   output$la_table <- reactable::renderReactable({
     dfe_reactable(
       la_table(),
-      columns = align_reactable_cols(la_table(), num_exclude = "LA Number"),
+      columns = utils::modifyList(
+        align_reactable_cols(la_table(), num_exclude = "LA Number"),
+        list(
+          `LA and Regions` = set_min_col_width()
+        )
+      ),
       rowStyle = function(index) {
         highlight_selected_row(index, la_table(), input$la_input)
       }

02_dev/la_level_page/la_page_features_workshop.R

@@ -11,8 +11,8 @@ list.files("R/", full.names = TRUE) |>
 
 # LAIT LA Level ----------------------------------
 # - Local Authority, Region and England table ---
-selected_topic <- "All Pupil Absence & Exclusions"
-selected_indicator <- "Percentage of LAC pupil with at least one fixed exclusion"
+selected_topic <- "Health and Wellbeing"
+selected_indicator <- "Infant Mortality"
 selected_la <- "Bedford Borough"
 
 # Filter stat neighbour for selected LA