```{bash, echo=FALSE} wget --no-check-certificate --no-verbose https://costalab.ukaachen.de/open_data/MOJITOO/ATAC_LSI.Rds wget --no-check-certificate --no-verbose https://costalab.ukaachen.de/open_data/MOJITOO/RNA_PCA.Rds
### 2. library ```r library(MOJITOO)
RNA_PCA = readRDS("RNA_PCA.Rds") ATAC_LSI = readRDS("ATAC_LSI.Rds") (RNA_PCA[1:5, 1:5]) (ATAC_LSI[1:5, 1:5]) message("dims of pca & lsi: ", nrow(RNA_PCA), " ", ncol(RNA_PCA), ", ", nrow(ATAC_LSI), " ", ncol(ATAC_LSI))
MOJITOO_DM <- mojitoo_Matrix( reduction_matrix.list= list(RNA_PCA, ATAC_LSI), dims.list = list(1:50, 2:50) ## exclude 1st dimension of LSI ) MOJITOO_DM[1:5, 1:5] message("dims of MOJITOO_DM: ", nrow(MOJITOO_DM), " ", ncol(MOJITOO_DM))
sessionInfo()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.