diff --git a/_quarto.yml b/_quarto.yml index 70d26205..5dee594b 100644 --- a/_quarto.yml +++ b/_quarto.yml @@ -106,3 +106,8 @@ filters: - assets/custom.lua - reveal-logo - fontawesome + +# For rendering location the info page; options are Stockholm or online. +# One or more separated by commas or semicolon; online doesn't display any +# location info. +location: stockholm diff --git a/env/deploy/environment.yml b/env/deploy/environment.yml index 3c8fe484..e013875c 100644 --- a/env/deploy/environment.yml +++ b/env/deploy/environment.yml @@ -12,6 +12,7 @@ dependencies: - r-here - r-htmltable - r-kableextra + - r-leaflet - r-lubridate - r-palmerpenguins - r-readxl diff --git a/home_info.qmd b/home_info.qmd new file mode 100644 index 00000000..0d025039 --- /dev/null +++ b/home_info.qmd @@ -0,0 +1,66 @@ +--- +title: Practical Info +subtitle: Venue, address, travel and contact information +toc: false +number-sections: false +sidebar: false +code-tools: false +format: html +--- + +```{r} +#| eval: true +#| include: false +library(yaml) +library(here) +library(leaflet) +library(readxl) + +# Set location in _quarto.yml +loc <- sapply(unlist(strsplit(yaml::read_yaml(here("_quarto.yml"))$location,";|,")),trimws) +dfr <- readxl::read_xlsx("info.xlsx") +``` + +## Location + +```{r} +#| echo: false +#| eval: true +#| results: "asis" +cat("\n::: {.panel-tabset}\n") + +for (i in seq_along(loc)) { + p <- loc[i] + cat(paste0("\n### ", tools::toTitleCase(p), "\n")) + + if(p %in% dfr$location){ + dfr1 <- dfr[dfr$location %in% p, , drop = FALSE] + dfr1$address <- gsub(",", "
", dfr1$address) + icons <- awesomeIcons(icon = dfr1$marker_icon, markerColor = dfr1$marker_colour, iconColor = "#FFFFFF", library = "fa") + if(p != "online") { + cat(knitr::knit_child(input = "assets/_child-info.qmd", envir = environment(), quiet = TRUE)) + cat("\n") + cat("\n", dfr1$address[1], "\n") + } + cat("\n", dfr1$description[1]) + }else{ + cat("No additional information is provided.") + } + cat("\n") +} + +cat(":::\n") +``` + +## Contact + +This workshop is run by the **National Bioinformatics Infrastructure Sweden +(NBIS)**. NBIS is a platform at [SciLifeLab](https://www.scilifelab.se/) +(Science For Life Laboratory) and the Swedish node of +[Elixir](https://elixir-europe.org/). + +If you would like to get in touch with us regarding this workshop, please contact us at **edu.trr [at] nbis.se**. + +*** + +![](assets/logos/nbis-scilifelab.svg){height="26px"} diff --git a/info.xlsx b/info.xlsx new file mode 100644 index 00000000..168295ff Binary files /dev/null and b/info.xlsx differ