learning-resources.qmd

---
title: Learning Resource List
format:
  html:
    toc: false
order: 1
fig-align: center
fig-cap-location: top
sidebar: false
image: images/home-page-3.jpeg
code-fold: true
execute:
  echo: false
  warning: false
---

While not exhaustive, we’ve pulled together a set of self-guided learning resources for readers beginning their computational biology journey. Included are learning-oriented tutorials, task-oriented how-to guides, and information-oriented references. The formats vary from YouTube courses and MOOCs to website-based books and cheat-sheets.


Search, sort, and filter the resources below :)


```{r}
#load libraries
library(yaml)
library(tidyverse)
library(reactable)
library(htmltools)
library(reactablefmtr)

#process yaml
y <- read_yaml(file = "~/Documents/repo/self-guided-learning/learning-resources.yaml")
df <- plyr::ldply (y, data.frame, stringsAsFactors=FALSE)
```


```{css, echo=FALSE}
.my-tbl {
  border: 0px solid rgba(0, 0, 0, 0.1);
  border-radius: 20px;
}

.rt-tr-header {
    background: #dbebea;
    text-transform: uppercase;
    border-radius: 20px 20px 0px 0px;
}

.my-col {
  border-right: 1px solid rgba(0, 0, 0, 0.05);
}

.my-row:hover {
  background-color: #f5f8ff;
}
```

```{r}
htmltools::browsable(
  tagList(
    tags$button(
      "Expand/Collapse All",
      onclick = "Reactable.toggleAllRowsExpanded('expansion-table')", 
      style="background-color: #f8f8f8; border-radius: 4px !important; border: 1; absolute: right"
      ),

    reactable(df, class = "my-tbl", fullWidth = TRUE, compact = TRUE,
              filterable = TRUE, searchable = TRUE, rowStyle = list(cursor = "pointer"),
              striped = TRUE, resizable = TRUE, highlight = TRUE, elementId = "expansion-table",
              showPageSizeOptions = TRUE, onClick = "expand", rownames = FALSE,
              width ='100%', pagination = TRUE, defaultExpanded = TRUE,
              showSortable = TRUE, groupBy = "maincategory",
              height = "auto", outlined = FALSE, showSortIcon = TRUE,
              columns = list(name = colDef(html = TRUE, 
                                           name = "NAME",
                                           minWidth = 75),
                         description = colDef(html = TRUE, 
                                              name = "DESCRIPTION", 
                                              minWidth = 200), 
                         format = colDef(html = TRUE, 
                                              name = "FORMAT", 
                                              minWidth = 50), 
                         maincategory = colDef(html = TRUE, 
                                               show = TRUE,
                                               name = "CATEGORY", 
                                               minWidth = 50)))
  ) %>%
    google_font(font_family = "Lato")
)
```