FloWuenne

library(devtools)

#### Specific datasets
## Specific time point Rds
source_gist("https://gist.github.com/FloWuenne/df2dca6804f562ed90db26a04508af31", filename = "Create_clustering_module_Rds.R")

## Specific time point .Rdata
source_gist("https://gist.github.com/FloWuenne/dfd1e00c198b2ae1adeb16720a844441",, filename = "Create_clustering_module_Rds.R")

#### All datasets

FloWuenne

library(dplyr)
library(tidyr)

## Define S4 object with required components
Clustering_info <- setClass("clustering_module",slots=c(tsne="data.frame",
                                                  metadata="data.frame",
                                                  norm_exprs="data.frame",
                                                  marker_list="data.frame"))
                                                  

FloWuenne

library(dplyr)
library(tidyr)

## Define S4 object with required components
Clustering_info <- setClass("clustering_module",slots=c(tsne="data.frame",
                                                  metadata="data.frame",
                                                  norm_exprs="data.frame",
                                                  marker_list="data.frame"))
                                                  

FloWuenne

## This is only on compute canada clusters where modules are available!
module load python/3.7.4

## Create virtual environment using python
python3 -m venv ./kb_python_env

## activate environment
source ./kb_python_env/bin/activate

## Install kb-python inside environment

opub

from PIL import Image
import glob
import math

#
# This script will take all of the images that match a pattern in the local 
# directory and generate an animated GIF with each image as a frame. Useful 
# for capturing all of your NFTs into a single file for sharing.
#
# One time setup assuming you already have python and pip installed.