travel page and logo and temporary removal (#13)

* update workflow

* remove Fetch gh-pages

* remove fix devtools section

* fix

* Improve organizer table #3

* fix organizer table

* fix organizer table

* logo and travel page

* correcttions

* link update

---------

Co-authored-by: Tuomas Borman <[email protected]>

Author: ake123

R/organizers.R

@@ -16,47 +16,35 @@ create_organizer_table <- function(table.path = file.path("..", "data", "organiz
         mutate(order = ifelse(is.na(order) | order == "", Inf, as.numeric(order)))
 
     # Add organizer group
-    groups <- c("Local", "Community")
-    organizers[["group"]] <- ifelse(organizers[["local"]], groups[[1L]], groups[[2L]])
-
-    # Loop over local and community
-    for (grp in groups) {
-        cat("##", grp, "\n\n")
-
-        df <- organizers |>
-            filter(group == grp) |>
-            arrange(order, name) |>
-            mutate(
-                img = sprintf("![](%s){height=150}", img_path),
-                label = name
-            )
-
-        # Fill empty slots so table is rectangular
-        n_missing <- ncol - (nrow(df) %% ncol)
-        if (n_missing < ncol) {
-            df <- bind_rows(df, data.frame(
-                name = rep("", n_missing),
-                local = rep(FALSE, n_missing),
-                order = rep(Inf, n_missing),
-                img_path = rep("", n_missing),
-                group = rep(grp, n_missing),
-                img = rep("", n_missing),
-                label = rep("", n_missing)
-            ))
-        }
-
-        # Make matrix with alternating rows (image row, name row)
-        img_mtx <- matrix(df$img, ncol = ncol, byrow = TRUE)
-        name_mtx <- matrix(df$label, ncol = ncol, byrow = TRUE)
-        ij <- rep(seq_len(nrow(img_mtx)), each = 2) + c(0, nrow(img_mtx))
+    df <- organizers |>
+      arrange(order, name) |>
+      mutate(
+        img = sprintf("![](%s){height=150}", img_path),
+        label = name
+      )
+    n_missing <- ncol - (nrow(df) %% ncol)
+    if (n_missing < ncol) {
+      df <- bind_rows(df, data.frame(
+        name = rep("", n_missing),
+        local = rep(FALSE, n_missing),
+        order = rep(Inf, n_missing),
+        img_path = rep("", n_missing),
+        img = rep("", n_missing),
+        label = rep("", n_missing),
+        stringsAsFactors = FALSE
+      ))
+    }
+    # Make matrix with alternating rows (image row, name row)
+    img_mtx <- matrix(df$img, ncol = ncol, byrow = TRUE)
+    name_mtx <- matrix(df$label, ncol = ncol, byrow = TRUE)
+    ij <- rep(seq_len(nrow(img_mtx)), each = 2) + c(0, nrow(img_mtx))
 
-        tbl <- data.frame(rbind(img_mtx, name_mtx)[ij, ])
+    tbl <- data.frame(rbind(img_mtx, name_mtx)[ij, ])
 
-        kable(tbl, format = "html", align = align, col.names = NULL, escape = FALSE,
-              table.attr = 'class="organizers-table table table-borderless"') |>
-            kable_styling(full_width = FALSE, position = "left") |>
-            print()
+    kable(tbl, format = "html", align = align, col.names = NULL, escape = FALSE,
+          table.attr = 'class="organizers-table table table-borderless"') |>
+      kable_styling(full_width = FALSE, position = "left") |>
+      print()
 
-        cat("\n\n")
-    }
+    cat("\n\n")
 }

_quarto.yml

@@ -25,7 +25,7 @@ website:
           - href: pages/organizers.qmd
           - href: pages/past-events.qmd
           - href: pages/code-of-conduct.qmd
-          #- href: pages/travel-information.qmd
+          - href: pages/travel-information.qmd
           #- href: pages/conference-dinner.qmd
   page-footer:
     left: |

index.qmd

@@ -20,10 +20,9 @@ toc: false
 
 ::: {.column width="43%"}
 ::: {.img-float}
-![](images/logos/bioconductor_sticker.gif){style="width: 33%; float: left; margin: 5px;"}
+![](images/logos/bioconductor_sticker.gif){style="width: 25%; float: left; margin: 5px;"}
 :::
 \
-\
 The European Bioconductor Conference (EuroBioC2026) will take place on
 **June 3-5, 2026**, in **Turku, Finland**. EuroBioC2026 will
 bring together the Bioconductor community to showcase the latest cutting-edge

pages/travel-information.qmd

@@ -0,0 +1,12 @@
+# Travel Information
+
+## Conference venue
+
+
+The European Bioconductor Conference 2026 will be held in **Turku, Finland**.
+
+The venue is **[BioCity Turku](https://biocityturku.fi/)**.
+
+
+<iframe src="https://www.google.com/maps/embed?pb=!1m18!1m12!1m3!1d1966.634515144646!2d22.290319212102773!3d60.449426420761306!2m3!1f0!2f0!3f0!3m2!1i1024!2i768!4f13.1!3m3!1m2!1s0x468c76e7cb2e9abb%3A0xf85671e5bdaa768a!2sBioCity!5e0!3m2!1sen!2sfi!4v1760602199773!5m2!1sen!2sfi" width="600" height="450" style="border:0;" allowfullscreen="" loading="lazy" referrerpolicy="no-referrer-when-downgrade"></iframe>
+