Can follow here: Beyond the Cell Atlas: Live – Chan Zuckerberg Biohub
- Using single cell to understand molecular physiology
- mostly around development of lung
- also touched on alzheimers
| library(parallel) | |
| library(stringr) | |
| # prelim setup | |
| structure_binary <- "/path/to/structure" | |
| n.cores <- 8 | |
| # number of Ks to try | |
| tryK <- 1L:20L | |
| n.runs <- 1L:20L |
| library(nullabor) | |
| library(gganimate) | |
| library(magrittr) | |
| p <- mtcars %>% | |
| rorschach(method = null_permute("mpg"), n = 20, true = .) %>% | |
| ggplot() + | |
| geom_boxplot(aes(x = factor(cyl), y = mpg, fill = factor(cyl))) + | |
| theme(legend.position = 'none', aspect.ratio = 1) + | |
| xlab("cyl") |
Can follow here: Beyond the Cell Atlas: Live – Chan Zuckerberg Biohub
gif_tour <- function(data, tour_path, display, ... ) {
dir <- tempdir()
png_path <- file.path(dir, "frame%03d.png")
tourr::render(data,
tour_path = tour_path,
display = display,
dev = "png",
png_path,