library(BiocStyle) knitr::opts_chunk$set(error=FALSE, message=FALSE, warning=FALSE)
Looks like we made a mistake in the phase assignments:the names should be G2
not G2M
.
tmp <- "update_20240425" unlink(tmp, recursive=TRUE) # get rid of any previous directory. gypsum::cloneVersion("scRNAseq", "leng-esc-2015", "2024-04-18", destination=tmp)
Now we go in and edit the column annotations:
colpath <- file.path(tmp, "column_data") df <- alabaster.base::readObject(colpath) phase <- sub("_Exp.*", "", rownames(df)) phase[!phase %in% c("G1", "S", "G2")] <- NA df$Phase <- phase table(phase) unlink(colpath, recursive=TRUE) alabaster.base::saveObject(df, colpath)
We run some validation to ensure that our modified files are still valid.
library(alabaster.base) validateObject(tmp) # Confirming that the assay names changed. readObject(tmp)$Phase
sessionInfo()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.